图片显示问题

[vipmaster]

图片显示问题

我在photo文件夹中有一组图片，大约5张左右。我现在就是要图片一张一张轮换的显示，我用ad rotator来做的，可是这样显示是随机的，不是顺序的显示，请高手指点。急！
代码如下：
adrotator.asp

<% @language="vbscript" %>
<%
set myrotator=server.createobject("mswc.adrotator")
response.write myrotator.getadvertisement("adrot.txt")
%>


adrot.txt

redirect register.asp
WIDTH 200
HEIGHT 200
BORDER 0
*
photo/ok0.gif
-
ok0.gif
1
photo/ok1.gif
-
ok1.gif
1

[saucer]

if you want to 顺序的显示, don't use adrotator, write your own code instead

<% @language="vbscript" %>
<%
imgs = Array("1.gif","2.gif","3.gif","4.gif","5.gif")
if Session("ImageIndex") is empty or Session("ImageIndex") = "" then
Session("ImageIndex") = -1
end if

Session("ImageIndex") = Session("ImageIndex") + 1

if Session("ImageIndex") > UBOUND(imgs) then
Session("ImageIndex") = 0
end if

Response.Write "<img src='" & imgs(Session("ImageIndex")) & "'>"
%>