|
  
- UID
- 46654
- 帖子
- 45548
- 威望
- 2474 点
- 魅力
- 2230
- ◎心币◎
- 2843 ＄
- 推广积分
- 1052 分
- 充值币
- 0 枚
- 性别
- 女
                         
|
楼主
发表于 2007-4-13 11:21
| 只看该作者
脚本说明:
第一步:把如下代码加入<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>
第二步:把<body>换为
<body background=back.jpg onLoad="ob(),setNum(),setInterval('timer()',100);setInterval('runClock()',100)">
|
|
