设为首页 加入收藏  
首页 >>ASP>>正文

文字向上滚动,无间隙的代码

作者: 上传时间:2007-8-18 18:19:46 来源:

<div id=demo style="overflow:hidden;height:450;width:96; margin-top:1px;">


     <div id=demo3>
<% set rs=server.createobject("adodb.recordset")
            sql="select top 4 * from hw "
            rs.open sql,conn,1,1

            DO While Not rs.eof
            %>

    <span>
    <a href="zjtjshow.asp?id=<%=rs("id")%>" target="_blank"><img src="<%=Rs("hw_pic")%>" width="94" height="129" border="0" /></a><br>
    <a href="zjtjshow.asp?id=<%=rs("id")%>" target="_blank"><font color="#FF9900"><strong><%=rs("zjname")%></strong></font></a>
    </span>
<%rs.movenext
            loop
        rs.close
        set rs=nothing
            %>

</div>
         <div id=demo4></div>

</div>
        

<SCRIPT LANGUAGE="JavaScript">
<!--
    var scrollsspeed=20;
    var on=true;
    demo4.innerHTML=demo3.innerHTML;
    function Marquee(onleft){
        if (on){
            if(demo4.offsetHeight-demo.scrollTop<=0){
                demo.scrollTop-=demo3.offsetHeight;
            }else
            {
                demo.scrollTop++;
            }
        }
    }
    var MyMar=setInterval(Marquee,scrollsspeed);
//    demo.onmouseover=function() {clearInterval(MyMar)}
//    demo.onmouseout=function() {MyMar=setInterval(Marquee,speed)}
//-->
</SCRIPT>

版权所有:天天网络工作室 晋ICP备06006449
手机:13103416120
Email:sxlwp@163.com QQ: 170229409