跑马灯不间断循环(网站首页)

跑马灯不间断循环(网站首页)

<TABLE width="96%" border=0 align="center" cellPadding=0 cellSpacing=0>
        <TBODY>
          <TR>
            <TD >
                                <div id=demo style='overflow:hidden;height:135px;width:550px;'>

                <TABLE cellSpacing=0 cellPadding=0 border=0>
                  <TBODY>
                    <TR>
                      <TD id=demo1>
                      
                      <TABLE cellSpacing=0 cellPadding=0 border=0>
                          <TBODY>
                            <TR>
                              <%...
set rs_news=server.createobject("adodb.recordset")
sqltext4="select * from Product where Passed=True And Elite=True order by articleid desc"
rs_news.open sqltext4,conn,1,1
if rs_news.eof then
response.Write("没有新产品上架!")
end if
%>
                              <%...i=0
do while not rs_news.eof%>
                              <TD width=139><TABLE cellSpacing=0 cellPadding=0 width=150 
                              align=center border=0>
                                  <TBODY>
                                    <TR>
                                      <TD><div align="center"><a href=ArticleShow.asp?articleid=<% =rs_news("articleid") %> title="<%=rs_news("Title")%>"><img border=0 src="<%=rs_news("DefaultPicUrl")%>" width=72 height=96></a></div></TD>
                                    </TR>
                                    <TR>
                                      <TD height=23><DIV align=center><a href="ArticleShow.asp?ArticleID=<%=rs_news("articleid")%>" title="<%=rs_news("Title")%>"><%=cutstr(rs_news("Title"),8)%></a> </DIV></TD>
                                    </TR>
                                  </TBODY>
                              </TABLE></TD>
                              <%...   rs_news.movenext
i=i+1
if i=8 then exit do
loop
rs_news.close %>
                            </TR>
                          </TBODY>
                      </TABLE>
                      
                      </TD>
                      <TD id=demo2></TD>
                       
                    </TR>
                  </TBODY>
                </TABLE>
              </div>
     
     <script>...
   var speed=15
   demo2.innerHTML=demo1.innerHTML
   function Marquee()...{
   if(demo2.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>
            </TD>
          </TR>
        </TBODY>
      </TABLE>