ASP 广告加载器成分

ASP AdRotator 组件

ASP AdRotator 组件创建一个 AdRotator 对象，每次用户进入或刷新页面时，该对象都会显示不同的图片。文本文件包含有关图片的信息。

笔记：AdRotator 不适用于 Internet Information Server 7 (IIS7)。

语法

<%
set adrotator=server.createobject("MSWC.AdRotator")
adrotator.GetAdvertisement("textfile.txt")
%>

ASP AdRotator 示例

假设我们有以下文本文件，名为"ads.txt"：

REDIRECT banners.html
*
w3s.gif
https://www.91xjr.com
Free Tutorials from 91xjr
50
xmlspy.gif
https://www.altova.com
XML Editor from Altova
50

上述文本文件中星号下方的行指定要显示的图片（广告）的名称、超链接地址、替代文本（图片）以及显示率（以百分比表示）。

上面文本文件中的第一行指定当访问者单击其中一个图片时会发生什么。重定向页面 (banners.html) 将收到一个带有要重定向到的 URL 的查询字符串。

提示：要指定图片的高度、宽度和边框，可以在 REDIRECT 下插入以下行：

REDIRECT banners.html
WIDTH 468
HEIGHT 60
BORDER 0
*
w3s.gif
...

"banners.html" 文件如下所示：

示例

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

<!DOCTYPE html>
<html>
<body>
<%
set adrotator=Server.CreateObject("MSWC.AdRotator")
response.write(adrotator.GetAdvertisement("textfile.txt"))
%>
</body>
</html>

显示示例 »

就这样！！

ASP AdRotator 属性

Property	Description	Example
Border	Specifies the size of the borders around the advertisement	<% set adrot=Server.CreateObject("MSWC.AdRotator") adrot.Border="2" Response.Write(adrot.GetAdvertisement("ads.txt")) %>
Clickable	Specifies whether the advertisement is a hyperlink	<% set adrot=Server.CreateObject("MSWC.AdRotator") adrot.Clickable=false Response.Write(adrot.GetAdvertisement("ads.txt")) %>
TargetFrame	Name of the frame to display the advertisement	<% set adrot=Server.CreateObject("MSWC.AdRotator") adrot.TargetFrame="target='_blank'" Response.Write(adrot.GetAdvertisement("ads.txt")) %>

ASP AdRotator 方法

Method	Description	Example
GetAdvertisement	Returns HTML that displays the advertisement in the page	<% set adrot=Server.CreateObject("MSWC.AdRotator") Response.Write(adrot.GetAdvertisement("ads.txt")) %>