ASP AdRotator 组件

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.asp
*
w3s.gif
https://www.w3ccoo.com
Free Tutorials from W3Schools
50
xmlspy.gif
https://www.altova.com
XML Editor from Altova
50

上述文本文件中星号下方的行指定要显示的图像(广告)的名称、超链接地址、替代文本(用于图像)和显示率(百分比)。

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

提示:要指定图像的高度、宽度和边框,您可以在 REDIRECT 下插入以下行:

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

"banners.asp" 文件如下所示:

实例

<%
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>

显示示例 »

That's all!!



ASP AdRotator 属性

属性 描述 例子
Border 指定广告周围边框的大小 <%
set adrot=Server.CreateObject("MSWC.AdRotator")
adrot.Border="2"
Response.Write(adrot.GetAdvertisement("ads.txt"))
%>
Clickable 指定广告是否为超链接 <%
set adrot=Server.CreateObject("MSWC.AdRotator")
adrot.Clickable=false
Response.Write(adrot.GetAdvertisement("ads.txt"))
%>
TargetFrame 显示广告的框架名称 <%
set adrot=Server.CreateObject("MSWC.AdRotator")
adrot.TargetFrame="target='_blank'"
Response.Write(adrot.GetAdvertisement("ads.txt"))
%>

ASP AdRotator 方法

方法 描述 例子
GetAdvertisement 返回在页面中显示广告的 HTML <%
set adrot=Server.CreateObject("MSWC.AdRotator")
Response.Write(adrot.GetAdvertisement("ads.txt"))
%>