[心缘地方]同学录
首页 | 功能说明 | 站长通知 | 最近更新 | 编码查看转换 | 代码下载 | 常见问题及讨论 | 《深入解析ASP核心技术》 | 王小鸭自动发工资条VBA版
登录系统:用户名: 密码: 如果要讨论问题,请先注册。
发表人 主题:急求老大看看,滚动相片怎么就显示一张?
阿成
身份:user
发帖:12
登陆次数:14
1F 发表于 2009-4-6 12:49:59
我的网站:www.02241.cn
<!---------------------最新照片-------------------------------------->
<% if mid(IndexPageShowItems,6,1)="1" then %>
<script language="JavaScript" src="js/photosize.js"></script>
<div id="newPhoto">
<%
'相册锁定,或者照片锁定的,都不显示。
sql="select top 6 P.photoID,P.photoFilename,U.realName "&_
    "from (TBL_Photo P inner join TBL_Album A on P.albumID=A.albumID) "&_
    "inner join TBL_USER U on U.userName=P.userName "&_
    "where A.locked='no' and P.locked='no' "&_
    "order by P.photoID desc"
rs.open sql,conn,0,1 
columns=3 '每行显示3个 
%>
<div id=demo style=overflow:hidden;height:150;width:550;color:#ffffff><table align=left cellpadding=0 cellspace=0 border=0><tr><td id=demo1 valign=top>
<a href="photo_viewphoto.asp?photoID=<%=rs("photoID")%>" 

target="_blank" class="photoShowBlock2">      
    <img src="<%=getPhotoURL(rs("photoFilename"))%>" border="0" 

height="120"  onload="DrawImage(this);">


</td><td id=demo2 valign=top></td><td id=demo3 valign=top></td><td id=demo4 valign=top></td>
<td id=demo5 valign=top></td><td id=demo6 valign=top></td></tr></table></div>
  <script>
  var speed=30
  demo2.innerHTML=demo1.innerHTML;
  demo3.innerHTML=demo1.innerHTML;
  demo4.innerHTML=demo1.innerHTML;
  demo5.innerHTML=demo1.innerHTML;
  demo6.innerHTML=demo1.innerHTML ;
   function Marquee(){
  if(demo6.offsetWidth-demo.scrollLeft<=0)
  demo.scrollLeft-=demo1.offsetWidth
  else{
  demo.scrollLeft++
  }
  }
  var MyMar=setInterval(Marquee,speed)
  demo.onmouseover=function() {clearInterval(MyMar)}
  demo.onmouseout=function() {MyMar=setInterval(Marquee,speed)}
  </script>
<%rs.close%>
</div>
<% end if %>

嘎嘎,是我
身份:admin
发帖:1424
登陆次数:2766
2F 发表于 2009-4-10 11:52:28
demo2.innerHTML=demo1.innerHTML;
  demo3.innerHTML=demo1.innerHTML;
  demo4.innerHTML=demo1.innerHTML;
  demo5.innerHTML=demo1.innerHTML;
  demo6.innerHTML=demo1.innerHTML ;
这段是你自己加的吗?还是原来就有的?
因为你只显示了一张,所以就只有一张,

应该6个单元格,都用
<a href="photo_viewphoto.asp?photoID=<%=rs("photoID")%>" 

target="_blank" class="photoShowBlock2">      
    <img src="<%=getPhotoURL(rs("photoFilename"))%>" border="0" 

height="120"  onload="DrawImage(this);">
这段,但是后5个前面还要加<%rs.movenext%>才行。

阿成
身份:user
发帖:12
登陆次数:14
3F 发表于 2009-4-10 12:46:35
demo2.innerHTML=demo1.innerHTML;
  demo3.innerHTML=demo1.innerHTML;
  demo4.innerHTML=demo1.innerHTML;
  demo5.innerHTML=demo1.innerHTML;
  demo6.innerHTML=demo1.innerHTML ;
原来这段是重复上 一条,多余的。
现在搞好了,谢谢老大啊!真的很佩服,工作愉快!

 
标题:
消息图标:                                             
                                            
正文:



* UBB 代码开启

 
CopyRight © 心缘地方 2005-2999. All Rights Reserved