我有一段程序关于文字连续滚动的问题，我问了许多人,他们给出我的答案几乎是相近的,但是,我却不会改,我想实现的效果是让从数据库调出来的企业的名称,连续向上滚动,并且中间没有任何的空隙,也就是无缝循环,但我水平太烂,不会改,麻烦哪位大哥帮忙改一下，多谢了!我贴在这儿了:
<!--#include file="sc_inc/sc_conn.asp"-->
<div id=demo style="overflow:hidden;height:80;width:410;color:#ffffff;">
<table align=left cellpadding=0 cellspace=0 border=0>
<tr>
<td id=demo1 valign=top>
<%
sql="select top 15 * from sc_xw where shenhe=1 and fgclose=1 and tuijian=1 and scxwlb_id=10 order by scxw_id desc"
set rs=Server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
while not rs.eof
if len(rs("scxwbt"))>11 then
scxwbt=left(rs("scxwbt"),11)
scxwbt=scxwbt &".."
else
scxwbt=rs("scxwbt")
end if
%>
<span class="dian">·</span><span class="setgray"><a href="<%=rs("scxwpath")%>" target="_blank"><U><%= scxwbt %></U></a></span><br>
<%
rs.movenext
wend
rs.close
set rs=nothing
%>
</td>
<td id=demo2 valign=top></td>
</tr>
</table>
</div>
<script>
var speed=30
demo2.innerHTML=demo1.innerHTML
demo.scrollLeft=demo.scrollWidth
function Marquee(){
if(demo.scrollLeft<=0)
demo.scrollLeft+=demo2.offsetWidth
else{
demo.scrollLeft--
}
}
var MyMar=setInterval(Marquee,speed)
demo.onmouseover=function() {clearInterval(MyMar)}
demo.onmouseout=function() {MyMar=setInterval(Marquee,speed)}
</script>