ASP AdRotator 组件实例教程

好了下面我们来看看ASP AdRotator 组件实例教程吧.

在ASP AdRotator组件创建一个AdRotator对象，显示不同的图片每一次使用者进入或重新整理网页。一个文本文件包含有关的图片。

语法

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

例如
假设我们有一个文件名为“ banners.asp ” 。它看起来像这样：

<%
set adrotator=Server.CreateObject("MSWC.AdRotator")
response.write(adrotator.GetAdvertisement("ads.txt"))
%>

该文件“ ads.txt ”看起来像这样：

*
w3schools.gif
http://www.111com.net/
Visit W3Schools
80
microsoft.gif
http://www.111com.net/
Visit Microsoft
20

该线以下的星号文件“ ads.txt ”指定的图像显示，超链接地址，替代文本（用于图像） ，并显示在百分之利率的安打。我们看到， http://www.111com.net/图像将显示为80 ％的安打和微软图像将显示为20 ％的安打在上面的文本文件。

注意：若要取得联系工作时，用户点击它们，我们将不得不修改档案“ ads.txt ”有点：

REDIRECT banners.asp
*
w3schools.gif
http://www.w3schools.com/
Visit W3Schools
80
microsoft.gif
http://www.microsoft.com/
Visit Microsoft
20

重定向页面（ banners.asp ）现在将收到一个查询字符串的变量命名的网址载有网址重定向到。

注意：要指定高度，宽度，以及边境的形象，您可以插入以下线下重定向：
REDIRECT banners.asp
WIDTH 468
HEIGHT 60
BORDER 0
*
111cn.gif
...
... 

过去的事情是添加一些代码行的“ banners.asp ”档案：
<%
url=Request.QueryString("url")
If url<>"" then Response.Redirect(url)
%>

<%
set adrotator=Server.CreateObject("MSWC.AdRotator")
response.write(adrotator.GetAdvertisement("textfile.txt"))
%>

好了下面我们来看看 ASP AdRotator 方法与属性吧.

例如产权说明
边境指定的大小，边界周围的广告“ ％
设置adrot = Server.CreateObject （ “ MSWC.AdRotator ” ）
adrot.Border = “ 2 ”
Response.Write （ adrot.GetAdvertisement （ “ ads.txt ” ） ）
％ “
点击指定的广告是否是一个超连结“ ％
设置adrot = Server.CreateObject （ “ MSWC.AdRotator ” ）
adrot.Clickable =虚假
Response.Write （ adrot.GetAdvertisement （ “ ads.txt ” ） ）
％ “
TargetFrame的名称框，以显示广告“ ％
设置adrot = Server.CreateObject （ “ MSWC.AdRotator ” ）
adrot.TargetFrame = “目标= ' _blank ' ”
Response.Write （ adrot.GetAdvertisement （ “ ads.txt ” ） ）
％ “

方法
例如描述方法
GetAdvertisement返回的HTML显示的广告在“页< ％
设置adrot = Server.CreateObject （ “ MSWC.AdRotator ” ）
Response.Write （ adrot.GetAdvertisement （ “ ads.txt ” ） ）
％ “