adrotator

代码:

<%

url=Request.QueryString("url")

If url<>"" then Response.Redirect(url)

%>

<!DOCTYPE html>

<html>

<body>

 

<%

set adrotator=Server.CreateObject("MSWC.AdRotator")

adrotator.TargetFrame="target='_blank'"

response.write(adrotator.GetAdvertisement("text/advertisements.txt"))

%>

 

<p>

NOTE: Because images are changed randomly, and because this page has few images to choose from, it will

often display the same advertisement twice in a row.

</p>

 

<p>NOTE: The AdRotator does not work with Internet Information Server 7 (IIS7).</p>

 

<p>

<a href="text/advertisements.txt">

<img src="/images/btn_view_text.gif"></a>

</p>

</body>

</html>

结果:

相关文章