• Home
 · 
• Active Server Pages
 · 
• Using the Ad Rotator component from Micrsoft, this will make the browser create a new window when t

Using the Ad Rotator component from Micrsoft, this will make the browser create a new window when t

Using the Ad Rotator component from Micrsoft, this will make the browser create a new window when the ad is clicked on. (This is simmilar to

Rate Using the Ad Rotator component from Micrsoft, this will make the browser create a new window when t

• 1
• 2
• 3
• 4
• 5

(3(3 Vote))

Set AdRotator = Server.CreateObject("MSWC.AdRotator")
AdText = AdRotator.GetAdvertisement("/banners/ads.txt")
BeginLoc = InStr(AdText, "<A")
TELoc = InStr(BeginLoc + 3, AdText, " ")
AdText = Left(AdText,TELoc) & "TARGET=NewWin " & Right(AdText,(Len(AdText)-TELoc))
response.write AdText
%>