ASP基礎(chǔ)教程之ASP AdRotator 組件的使用_ASP教程

教程Tag：暫無(wú)Tag,歡迎添加,賺取U幣!

推薦：ASP六大對(duì)象介紹
Application對(duì)象 Application對(duì)象是個(gè)應(yīng)用程序級(jí)的對(duì)象，用來(lái)在所有用戶間共享信息，并可以在Web應(yīng)用程序運(yùn)行期間持久地保持?jǐn)?shù)據(jù)。 Application的屬性：方法如下： Application對(duì)象沒(méi)

ASP AdRotator 組件

每當(dāng)用戶進(jìn)入網(wǎng)站或刷新頁(yè)面時(shí)，ASP AdRotator組件就會(huì)創(chuàng)建一個(gè)AdRotator對(duì)象來(lái)顯示一幅不同的圖片。

語(yǔ)法：

以下為引用的內(nèi)容：
<%
set adrotator=server.createobject("MSWC.AdRotator")
adrotator.GetAdvertisement("textfile.txt")
%>

實(shí)例

假設(shè)我們有一個(gè)文件名為"banners.asp"。它類似于這樣：

以下為引用的內(nèi)容：
<html%>
<body%>
<%
set adrotator=Server.CreateObject("MSWC.AdRotator")
response.write(adrotator.GetAdvertisement("ads.txt"))
%>
</body%>
</html%>

文件"ads.txt"類似這樣：

以下為引用的內(nèi)容：
*
mb5ucom.gif
http://hl5o.cn/
Visit mb5u.Com
80
microsoft.gif
http://www.microsoft.com/
Visit Microsoft
20

"ads.txt"文件中星號(hào)下面的代碼定義了如何顯示這些圖像，鏈接地址，圖像的替換文本，在每百次點(diǎn)擊中的現(xiàn)實(shí)幾率。我們可以看到，W3School圖片的顯示幾率是80%，而Microsoft圖片的顯示幾率是20%。

注釋：為了使這些鏈接在用戶點(diǎn)擊時(shí)可以正常工作，我們需要對(duì)文件"ads.txt"進(jìn)行一點(diǎn)點(diǎn)小小的修改：

以下為引用的內(nèi)容：
REDIRECT banners.asp
*
mb5ucom.gif
http://hl5o.cn/
Visit mb5u.Com
80
microsoft.gif
http://www.microsoft.com/
Visit Microsoft
20

轉(zhuǎn)向頁(yè)面會(huì)接收到名為url的變量的查詢字符串，其中含有供轉(zhuǎn)向的URL。

注釋：如需規(guī)定圖像的高度、寬度和邊框，我們可以在REDIRECT下面插入這些代碼：

以下為引用的內(nèi)容：
REDIRECT banners.asp
WIDTH 468
HEIGHT 60
BORDER 0
*
mb5ucom.gif
...
...

最后要做的是把這些代碼加入文件"banners.asp"中：

以下為引用的內(nèi)容：

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

分享：用ASP代碼得到客戶端IP和當(dāng)前地址
1、得到客戶端IP <%myip=Request.ServerVariables("Remote_Addr")%> 2、得到當(dāng)前地址以下為引用的內(nèi)容： <script> document