AdRotator 实例教程

advertisements2.txt看看下面代码.

REDIRECT demo_adrotator2.asp 
*
/banners/rd_htmlref.jpg
http://www.111com.net/html/html_reference.asp
Complete HTML 4.0 Reference
20
/banners/w3schools.gif
http://www.111com.net
Web Tutorials from W3Schools
20
/banners/rd_xhtml.jpg
http://www.111com.net/xhtml/default.asp
XHTML Tutorial
20

<%
url=Request.QueryString("url")
If url<>"" then Response.Redirect(url)
%>

<%
set adrotator=Server.CreateObject("MSWC.AdRotator")
adrotator.TargetFrame="target='_blank'"
response.write(adrotator.GetAdvertisement("text/advertisements2.txt"))
%>