脚本特效展示
背景向下移动脚本
注意：把< body>换为 < body background=back.jpg onload="ob(),setnum(),setinterval('timer()',100);setinterval('runclock()',100)">
以下代码加入<head>区域
以下代码加入<body>区域
<script language=vbscript> dim c,numgc c=-100000 numgc=document.body.sourceindex sub sf c=c+2 document.all(numgc).style.backgroundposition="0 "&c id=settimeout("sf",64,"vbscript") end sub sf </script>