ASP Random image with links
ASP
Download (.zip)
//To run this script you need images.txt //You can find it here http://codelibary.com/temp/images.txt
<% url=Request.QueryString("url") If url<>"" then Response.Redirect(url) %> <html> <body>
<% set adrotator=Server.CreateObject("MSWC.AdRotator") adrotator.TargetFrame="target='_blank'" response.write(adrotator.GetAdvertisement("images.txt")) %>
</body> </html>
|