yomini Starting Member
2 Posts
AnonJr Moderator
United States 5768 Posts
<% '************************************************************ '* Code written by Alexander Haneng (C) 1998-2001 * '* FREE download from http://www.haneng.com/ * '************************************************************ '************************************************************ '*Code modified by reducks87 * '*Download available at http://www.reducks87.ontheinter.net * '************************************************************ RANDOMIZE intBannerLowestNumber = 1 intBannerHighestNumber = 2 intBannerRandomNumber = INT((intBannerHighestNumber - intBannerLowestNumber + 1) * Rnd + intBannerLowestNumber) SELECT CASE intBannerRandomNumber CASE "1" Response.Write("<A HREF=""http://europeanautospecialist.net/"" target=""_blank""><IMG SRC=""http://okmini.com/forum/ea.gif"" BORDER=""0""></A>") CASE "2" Response.Write("<A HREF=""http://minibeotch.com"" target=""_blank""><IMG SRC=""http://MINIBEOTCH.COM/images/MB_BANNER.gif"" BORDER=""1""></A>") END SELECT %>