NCS Logo - Click for home page Northstar Developer Center
Platforms
All Platforms
.NET Framework (1.x - 4.x)
Active Server Pages
ASP.NET
C#
SQL Server
VB.NET
Visual Basic

Keywords
.NET Data Types
.NET E-mail
.NET Events
.NET Functions
.NET Object Programming
.NET System.Configuration
.NET System.Diagnostics
.NET System.IO
.NET System.Net
.NET System.Net.Sockets
Active Data Objects
ASP Architecture
ASP Black Belt
ASP Built-in Functions
ASP Built-in Objects
ASP Debugging
ASP Performance
ASP Security
ASP Syntax
ASP.NET Authentication
ASP.NET Controls
ASP.NET Data Access
ASP.NET Features
ASP.NET Master Pages
ASP.NET Page Events
ASP.NET Security
ASP.NET ViewState
Atom
Certifications
COM, DCOM, COM+
Data Access
E-Mail
Errors
Exporting Data
HTML Tips
IIS
Object-Oriented Programming
RSS
SQL
Uncategorized ASP Tips
VB API Programming
VB Forms
VB Syntax
XML

Book Support
Visual Basic 6 Bible
ASP Bible
ASP Weekend Crash Course
ASP.NET At Work
Creating Web Services

Creating a Simple Ad Rotator

Written by Eric Smith, Northstar Computer Systems LLC

Users tend to respond better to banner ads when they change. Some sites, such as Amazon.com, make a number of banners available for use by their affiliates. However, you don't want to have to specify a single banner for each page. However, you can use the following code to randomly rotate through the banners, which have to be named using a number. For instance, you could use a name such as amazon7.gif. However, the name needs to be consistent for this code to work.
<%
   Randomize   ' provides true random numbers
   Dim intID   ' As Integer
   intID = CInt(Rnd() * 12)
   If sngID < 1 Then
      intID = 1
   End If
%&gt;
&lt;img src="amazon&lt;% = intID %&gt;.gif"&gt;

  
  
  

Keywords: [ Uncategorized ASP Tips ]

Publication Date: 6/1/2000