text3.txt

来自「Active Server Pages 网页制作教程看之前请传到ASP空间。或者」· 文本 代码 · 共 25 行

<SCRIPT Language="JavaScript">
   var msgt3 = "@msg";
   var intervalt3 = @interval;
   var space10="          ";
   var seqt3=0;
   window.setTimeout("ScrollText31();", intervalt3 );

   function ScrollText31() {
      document.@[e-mail] = msgt3.substring(0, seqt3+1);
      seqt3++;
      if ( seqt3 >= msgt3.length ) { seqt3 = 0;
         window.setTimeout("ScrollText32();", intervalt3 );
      }
      else
         window.setTimeout("ScrollText31();", intervalt3 );
   }

   function ScrollText32() {
      document.@[e-mail] = msgt3.substring(seqt3, msgt3.length) + space10 + msgt3.substring(0, msgt3.length);
      seqt3++;
      if ( seqt3 > msgt3.length ) { seqt3 = 0 };
      window.setTimeout("ScrollText32();", intervalt3 );
   }
</SCRIPT>
<FORM Name=@Form><INPUT Type=Text Name=@Text Size=@Size></FORM>