<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>想做却做不来<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>