图片无缝滚动 asp动态网页

12 篇文章 0 订阅

<div id=gundongpic style="BACKGROUND: #ffffff; OVERFLOW: hidden; WIDTH: 496px; COLOR: #ffffff; HEIGHT: 116px">
                <table width="132" height="115" border=0 align=center cellpadding=0 cellspacing="0"
cellspace="0">
                  <tbody>
                    <tr>
                      <td id=gundongpic1 valign=top><%
set rs=server.createobject("adodb.recordset")
sqltext="select top 10 * from nwyews where  BigClassName='宝贝在成长' and smallClassName='宝贝作品' ORDER BY ID DESC"
rs.open sqltext,conn,1,1
%>
       
                   <%i=1 %>
                          <table width="100%" border="0" cellspacing="1" cellpadding="0">
                            <tr>
                              <% Do While Not rs.EOF%>
                              <td align="center" valign="middle"><table width="110" border="0" align="center" cellpadding="2" cellspacing="0">
                                  <tr>
                                    <td class="formkuang2"><%
      if rs("FileName2")="Null" then
      response.write("<a href=Article.asp?id="&rs("id")&" target=_blank title="&rs("title")&"><img src='upload/nopic.jpg' width='110' height='85' border='0' align='absmiddle'> <a>")
      else
      response.write("<a href=Article.asp?id="&rs("id")&" target=_blank title="&rs("title")&"><img src='upload/"&rs("FileName2")&"' width='110' height='85' border='0' align='absmiddle'> <a>")
      end if
      %>
</td>
                                  </tr>
                                  <tr>
                                    <td height="24"><div align="center"><a href=Article.asp?id=<%=rs("id")%> target=_blank title=<%=rs("title")%>><%=left(rs("title"),10)%></a></div></td>
                                  </tr>
                              </table></td>
                              <td width="15" align="center" valign="middle">&nbsp;</td>
                              <% if i mod 2 = 0 then%>
                            </tr>
                            <tr>
                              <%
end if
rs.MoveNext
loop
rs.close
%>
                            </tr>
                        </table></td>
                      <td width="1" valign=top id=gundongpic2></td>
                    </tr>
                  </tbody>
                </table>
                <script>
             var speed=30
             gundongpic2.innerHTML=gundongpic1.innerHTML
             function Marquee(){
             if(gundongpic2.offsetWidth-gundongpic.scrollLeft<=0)
             gundongpic.scrollLeft-=gundongpic1.offsetWidth
             else{
             gundongpic.scrollLeft++
             }
             }
             var MyMar=setInterval(Marquee,speed)
             gundongpic.οnmοuseοver=function() {clearInterval(MyMar)}
             gundongpic.οnmοuseοut=function() {MyMar=setInterval(Marquee,speed)}
                      </script>
              </div>

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值