學學習網 手機版

學學習網

學習路徑: 學習首頁 > web開發 > ASP >

WEB開發 之 ASP AdRotator 組件

設置字體:
----------------------------------
WEB開發 之 ASP AdRotator 組件
 
ASP AdRotator 組件
 
每當用戶進入網站或刷新頁面時,ASP AdRotator 組件就會創建一個 AdRotator 對象來顯示一幅不同的圖片。
 
語法:
 
<%
set adrotator=server.createobject("MSWC.AdRotator")
adrotator.GetAdvertisement("textfile.txt")
%>
 
實例
 
假設我們有一個文件名為 "banners.asp"。它類似于這樣:
 
<html%>
<body%>
<%
set adrotator=Server.CreateObject("MSWC.AdRotator")
response.write(adrotator.GetAdvertisement("ads.txt"))
%>
</body%>
</html%>
 
文件 "ads.txt" 類似這樣:
 
*
w3school.gif
http://www.w3school.com.cn/
Visit W3School
80
microsoft.gif
http://www.microsoft.com/
Visit Microsoft
20  
 
"ads.txt" 文件中星號下面的代碼定義了如何顯示這些圖像,鏈接地址,圖像的替換文本,在每百次點擊中的顯示幾率。我們可以看到,W3School 圖片的顯示幾率是 80%,而 Microsoft 圖片的顯示幾率是 20%。
 
注釋:為了使這些鏈接在用戶點擊時可以正常工作,我們需要對文件 "ads.txt" 進行一點點小小的修改:
 
REDIRECT banners.asp
*
w3school.gif
http://www.w3school.com.cn/
Visit W3School
80
microsoft.gif
http://www.microsoft.com/
Visit Microsoft
20
 
轉向頁面會接收到名為 url 的變量的查詢字符串,其中含有供轉向的 URL。
 
注釋:如需規定圖像的高度、寬度和邊框,我們可以在 REDIRECT 下面插入這些代碼:
 
REDIRECT banners.asp
WIDTH 468 
HEIGHT 60 
BORDER 0 
*
w3school.gif
...
...
 
最后要做的是把這些代碼加入文件"banners.asp"中:
 
<%
url=Request.QueryString("url")
If url<>"" then Response.Redirect(url)
%>
<html>
<body>
<%
set adrotator=Server.CreateObject("MSWC.AdRotator")
response.write(adrotator.GetAdvertisement("textfile.txt"))
%>
</body>
</html>
 
好了,這就是全部的內容!
 
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"))
%>
 
AdRotator 組件的方法
 
GetAdvertisement 方法
 
返回在頁面中顯示廣告的 HTML。
 
<%
set adrot=Server.CreateObject("MSWC.AdRotator")
Response.Write(adrot.GetAdvertisement("ads.txt"))
%>
 
----------------------------------
課程列表
重點難點
贊助鏈接
倾国妲己官网