<script language=“VBScript”>
dim i, pic
i = -100000
pic = document.body.sourceIndex
sub scrollBG
i=i+1
Document.all(pic).style.BackgroundPosition= “0 ” & i
id=SetTimeOut(“scrollBG”, 64, “VBScript”)
end sub
scrollBG
</script>
これでいいはずですが
おかしいな
<script language="VBScript"> dim i, pic i = -100000 pic = document.body.sourceIndex sub scrollBG i=i+1 Document.all(pic).style.BackgroundPosition= "0 " & i id=SetTimeOut("scrollBG", 64, "VBScript") end sub scrollBG </script> これでいいはずですが