求救: 跑马灯不间断图片滚动,跑完一次就停下来了.在线等候呀....
Jey 2009-07-30 05:55:02 求救: 跑马灯不间断图片滚动,跑完一次就停下来了.在线等候呀....
源代码如下:
<td>
<div id="pro_demo" style="overflow:hidden; width:600px;height:101px;" class="cp_border">
<table width="600" height="101" border="0" cellspacing="0" cellpadding="0">
<tr>
<td id="pro_demo1">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="101px">
<tr>
<%
set rs=server.CreateObject("adodb.recordset")
rs.open "select top 20 * from ProdInfo order by ProId desc",conn,1,3
if rs.eof and rs.bof then
response.Write("当前没有产品信息")
else
do while not rs.eof
response.Write("<td class='td_padding_left1'><a href='product_show_reg.asp?typeid="&rs("ProTypeId")&"&id="&rs("ProId")&"'><img src='"&rs("ProImage")&"' alt='"&rs("ProTitle")&"' width='91' height='79' class='imgNoneBorder' /></a></td>")
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</tr>
</table>
</td>
<td id="pro_demo2"></td>
</tr>
</table>
</div>
<script language="javascript">
var speed=120;
pro_demo2.innerHTML=pro_demo1.innerHTML;
function Marquee(){
if(pro_demo2.offsetWidth-pro_demo.scrollLeft<=0)
pro_demo.scrollLeft-=pro_demo1.offsetWidth ;
else{
pro_demo.scrollLeft+=5;
}
}
var MyMar=setInterval(Marquee,speed)
pro_demo.onmouseover=function() {clearInterval(MyMar)}
pro_demo.onmouseout=function() {MyMar=setInterval(Marquee,speed)}
</script>
</td>