Question

图片不间断循环滚动代码

图片循环滚动,不留空白.图片能动态添加.

Answer 1

图片上下循环滚动的代码，把下面的表改成你自己的表就可以了。
<div id=demo onmouseover="clearInterval(inter);" onmouseout="inter=setInterval(qswhMarquee,30);" style="overflow:hidden;height:1500; width:131">
<div id=demo1>
<table width="131" class="leftbg" height="290" border=0 align="center" cellpadding="0" cellspacing="0">
<%
set rs_qy=Server.CreateObject("ADODB.Recordset")
rs_qy.open "select * from ghcompany",conn,1,1
while not rs_qy.eof
%>
<%if rs_qy("C_G_logo")<>"" then%>
<tr>
<td align="center"><%if rs_qy("C_G_http")<>"" then%><a href="<%=rs_qy("C_G_http")%>" target="_blank"><img src="sys_admin/<%=rs_qy("C_G_logo")%>" width="110" height="54" border="0" align="top"/></a>
<%else%><img src="sys_admin/<%=rs_qy("C_G_logo")%>" width="110" height="54" border="0" align="top"/>
<%end if%>
</td>
</tr>
<Tr><td height="9"></td></Tr>
<%end if%>
<%
rs_qy.movenext
wend
rs_qy.close
%>
</table>
</div>
<div id=demo2></div>
<script>
var t=demo.scrollTop;
var inter;
while(demo.offsetHeight>demo.scrollHeight)demo2.innerHTML+=(demo1.innerHTML+"");
demo2.innerHTML+=demo1.innerHTML;
function qswhMarquee(){
if(demo2.offsetTop<=demo.scrollTop)
demo.scrollTop-=demo1.offsetHeight;
else
demo.scrollTop++;
}
inter=setInterval(qswhMarquee,30);
</script>
</div>