ASP AdRotator 组件


每当用户进入网站或刷新页面时,ASP AdRotator 组件就会创建一个 AdRotator 对象来显示一幅不同的图像。有关图像的信息是包含在一个文本文件中。

注释:AdRotator 在 Internet Information Server 7 (IIS7) 中不起作用。

语法

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

ASP AdRotator 实例

假设我们有一个名为 "ads.txt" 的文件,如下所示:

  1. REDIRECT banners.asp
    *
    w3s.gif
    http://www.shouce.ren
    Free Tutorials from W3CSchool
    50
    xmlspy.gif
    http://www.altova.com
    XML Editor from Altova
    50

在上面的文本文件中型号下面的行规定了要显示的图像的名称、超链接地址、图像的替换文本和每百次点击中的显示几率。

上述文本文件的第一行指定当访客点击图像时进行的动作。重定向页(banners.asp)将收到一个带有重定向 URL 的查询字符串。

提示:如需规定图像的高度、宽度和边框,您可以在 REDIRECT 下面插入如下代码:

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

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

实例

  1. <%
    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 属性

属性描述实例
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"))
%>