zoukankan      html  css  js  c++  java
  • 连续滚动的图片

    <html>
    <head>
    <%
    Function RegExp_Execute(patrn, strng)
    Dim regEx, Match, Matches,values '建立变量。
    Set regEx = New RegExp '建立正则表达式。
    regEx.Pattern = patrn '设置模式。
    regEx.IgnoreCase = true '设置是否区分字符大小写。
    regEx.Global = True '设置全局可用性。
    Set Matches = regEx.Execute(strng) '执行搜索。
    For Each Match in Matches '遍历匹配集合。
    values=values&Match.Value&","
    Next
    RegExp_Execute = values
    End Function
    %>
    <title></title>
    <link type="text/css" rel="stylesheet" href="../CSS/CSS.css" />
    </head>
    <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
    <body>
    <div id=demo style="overflow:hidden;height:100;380;" align="center">
      <table width="756"  border="0" align="left" cellpadding="0" cellspacing="0" >
        <tr align="center">
          <td width="380" height="93" align="center" valign="bottom" id="demo1">
            <table width="380" height="93" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr valign="middle">

                <td height="106" width="178" valign="middle">
                  <table width="380" height="93" border="0" align="center" cellpadding="0" cellspacing="0">
                    <tr valign="top">
                      <td height="93" width="380">
         <div align="center" >
         <a href="qygl.aspx?funid=222" target="_blank"  ><img src="images/imgdj.jpg" border="0" ></a>
        <a href="qygl.aspx?funid=48" target="_blank" ><img src="images/imgfg.jpg" border="0"></a>
        <a href="gsjj.aspx?funid=16" target="_blank" ><img src="images/imgdsj.jpg" border="0" ></a>
        <a href="qygl.aspx?funid=47" target="_blank" ><img src="images/imgaq.jpg" border="0" ></a>
        </div>
                      </td>
                    </tr>
                </table> </td>
     
              </tr>         
            </table>
          </td>
          <td width="20" valign=top id=demo2></td>
        </tr>
      </table>
    </div>
      <script>
      var speed=22
      demo2.innerHTML=demo1.innerHTML
      function Marquee()
      {
          if(demo2.offsetWidth-demo.scrollLeft<=0)
          {
            demo.scrollLeft-=demo1.offsetWidth
          }
          else{
            demo.scrollLeft++
          }
      }
     var MyMar;
         function startmarquee()
         {
       MyMar=setInterval(Marquee,speed)    
         }

       window.setTimeout('startmarquee()',1000);
      demo.onmouseover=function() {clearInterval(MyMar)}
      demo.onmouseout=function() {MyMar=setInterval(Marquee,speed)}
      </script>
    </body>
    </html>

     

  • 相关阅读:
    细数ASP.NET MVC框架的7大顶级功能
    Ubuntu 10.10更新源列表
    使用iTunes将任意mp3文件转为iPhone铃声
    简单5步,在新浪微博上关联多个博客
    在windows 7 建立一个弹出光驱的快捷方式
    中国人民太伟大了!
    Ubuntu 10.10
    du 熊填数字
    WPF学习02——XAML编译
    Debugging WPF data bindings
  • 原文地址:https://www.cnblogs.com/mxh691/p/1234818.html
Copyright © 2011-2022 走看看