Email address: ">
Name: ">
City/State/Country: ">
Security check: please retype the number you see here:
<% Dim ImageNo, RndNum Randomize Timer ImageNo = CStr(Fix(99999 * Rnd)) 'Here you can set the max number of images to be shown, ie. 99999999 Session("ImageNo") = ImageNo 'Session variable of the final number to be shown For i = 1 To Len(ImageNo) RndNum = 99999 * Rnd 'Random number to avoid caching ' here, 'img' shows which number should be displayed, we write the image tag ' to get the image from asp page. Response.Write "" Next %>