28,408
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
OnlyVB 2004-08-10
- 打赏
- 举报
首先定义一个<div id=showimg><div>
<script language=vbs>
dim filename(5)'图片文件名
i=0
call show_img()
sub show_img()
i=i+1
if i>图片个数 then i=1
showimg.innerHTML="<img border=0 scr=" & filename(i) & ">"
call setTimeout("show_img()" ,1000)
End Sub
</script>
<script language=vbs>
dim filename(5)'图片文件名
i=0
call show_img()
sub show_img()
i=i+1
if i>图片个数 then i=1
showimg.innerHTML="<img border=0 scr=" & filename(i) & ">"
call setTimeout("show_img()" ,1000)
End Sub
</script>
