ASP AdRotator
ASP AdRotatorコンポーネント
ユーザーがウェブサイトを入力するか、ページを更新するたびに、ASP AdRotator成分が異なる画像を表示するAdRotatorオブジェクトを作成します。 画像に関する情報は、テキストファイルに含まれています。
注：AdRotatorは 、インターネットインフォメーションサーバー7（IIS7）を動作しません。
文法
<%
set adrotator=server.createobject("MSWC.AdRotator")
adrotator.GetAdvertisement("textfile.txt")
%>
set adrotator=server.createobject("MSWC.AdRotator")
adrotator.GetAdvertisement("textfile.txt")
%>
ASPのAdRotator例
次のように私たちは、「ads.txt」というファイルがあるとします。
REDIRECT banners.asp
*
w3s.gif
http://www.w3cschool.cc
Free Tutorials from W3CSchool
50
xmlspy.gif
http://www.altova.com
XML Editor from Altova
50
*
w3s.gif
http://www.w3cschool.cc
Free Tutorials from W3CSchool
50
xmlspy.gif
http://www.altova.com
XML Editor from Altova
50
上記のテキストファイルでは、入力次の行が表示される画像の置換テキスト、ハイパーリンクアドレス、画像の名前を指定し、すべての百は表示確率をクリックします。
訪問者が画像をクリックすると、アクションが実行されたときに上記のテキストファイルの最初の行が指定されています。 リダイレクトURLとクエリ文字列を受け取りますページ（banners.asp）をリダイレクトします。
ヒント：画像の高さ、幅、および境界線を指定するには、次のコードREDIRECT以下を挿入することができます。
REDIRECT banners.asp
WIDTH 468
HEIGHT 60
BORDER 0
*
w3s.gif
...
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>
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")) %> |