案例:ASP/ADO案例     状态:不可编辑再运行    进入竖版
 运行结果 
x
 
1
2
<html>
3
<body>
4
5
<%
6
set adrotator=Server.CreateObject("MSWC.AdRotator")
7
adrotator.Border="2"
8
Response.Write(adrotator.GetAdvertisement("/example/aspe/advertisements.txt"))
9
%>
10
11
<p>
12
<b>注释:</b>由于图像是随机变化的,
13
同时由于本页可供选择的图片很少,
14
因此经常会出现两次显示同一广告的情况。
15
</p>
16
17
<p>
18
<a href="/example/aspe/advertisements.txt">
19
查看 advertisements.txt
20
</a>
21
</p>
22
23
</body>
24
</html>
25