asp图片水平滚动一次就停了，把循环语句换成具体路径的图片就能无限滚动，求助啊 - ASP技术论坛

luckystar_t

等　级：新手上路
帖　子：20
专家分：5
注　册：2011-6-18
结帖率：66.67%

楼主

已结贴√ 问题点数：0 回复次数：5

asp图片水平滚动一次就停了，把循环语句换成具体路径的图片就能无限滚动，求助啊

<%
set rs=server.createobject("adodb.recordset")
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>

<link href="css/ctm.css" rel="stylesheet" type="text/css" />
</head>

<body>
<DIV id=aaa style="OVERFLOW: hidden; WIDTH: 897px; ">
<table width="897" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td background="images/Foot_hz_top.gif" height="6"></td>
  </tr>
  <tr>
    <td background="images/Foot_hz_bg.gif" height="65"  id=aaa1 >

          <table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
           <td width="18">
           </td>
<%
sql="select * from Links where 1=1"
sql=sql & " order by id"
rs.Open sql,conn,1,1
%>
<%
If rs.EOF AND rs.BOF then
    ShowError("该栏目尚未添加合作伙伴！")
Set rs = Nothing
conn.Close
Set conn = Nothing
end if
For i = 1 To rs.RecordCount
%>

              <td><img width="118" height="41" src="<%=rs("SitePic")%>"></td><td width="2"></td>
<%
rs.movenext
Next
rs.close
%>
             <td width="18">
           </tr>
         </table>

    </td>    <td id=aaa2 vAlign=top width=1></td>


    </TD>
  </tr>
  <tr>
    <td background="images/Foot_hz_Foot.gif" height="9"></td>
  </tr>
</table></DIV>
<script language="JavaScript" type="text/javascript">
var speed1=15
aaa2.innerHTML=aaa1.innerHTML
function Marquee(){
if (aaa2.offsetWidth-aaa.scrollLeft<=0) aaa.scrollLeft-=aaa.offsetWidth
else{ aaa.scrollLeft++ }
}
var MyMrr=setInterval(Marquee,speed1)
aaa.onmouseover=function() {clearInterval(MyMrr)}
aaa.onmouseout=function() {MyMrr=setInterval(Marquee,speed1)}
</script>
</BODY></HTML>
把循环语句换成具体路径的图片就能无限滚动，求助啊