status3.txt

来自「一套经典的asp教程 本人受益颇多 特推荐之 直接解压无密码」· 文本 代码 · 共 32 行

<SCRIPT Language="JavaScript">
   var msg="@msg";
   var interval = @interval;
   var spacelen = 120;
   var space10="          ";
   var seq=0;
   window.setTimeout("Scroll();", interval );

   function Scroll() {
      len = msg.length;
      window.status = msg.substring(0, seq+1);
      seq++;
      if ( seq >= len ) { 
         seq = spacelen; 
         window.setTimeout("Scroll2();", interval );
      }
      else
         window.setTimeout("Scroll();", interval );
   }   

   function Scroll2() {
      var out="";

      for (i=1; i<=spacelen/space10.length; i++) out += space10;
      out = out + msg;
      len=out.length;
      window.status=out.substring(seq, len);
      seq++;
      if ( seq >= len ) { seq = 0; };
      window.setTimeout("Scroll2();", interval );
   }   
</SCRIPT>