It took me a little while to make.
sweatdrop <%
Dim intNumber, intHow_many, intRandom
intHow_many = 3
Randomize
intRandom = Rnd()
intNumber = Int(intHow_many*intRandom + 1)
Select Case intNumber
Case 1
Response.redirect("Image URL")
Case 2
Response.redirect("Image URL")
Case 3
Response.redirect("Image URL")
End Select %>
An example.
Create that in notepad, change the "intHow_Many" to what ever number of pictures you want. You have a photobucket account, right?
Then, when you save it add ".asp" to the end of it.
After you've done that, create an account
here and upload it to there. Put the URL into
Reply
