ASP/ADO案例 - W3xue在线HTML/CSS/JS运行工具

<%
url=Request.QueryString("url")
If url<>"" then Response.Redirect(url)
%>
<html>
<body>

<%
set adrotator=Server.CreateObject("MSWC.AdRotator")
adrotator.TargetFrame="target='_blank'"
response.write(adrotator.GetAdvertisement("/example/aspe/advertisements2.txt"))
%>

<p><b>注释：</b></p>
<p>本案例因为安全性原因并没有跳转效果，仅供测试，请在实际案例中增加过滤request字符串功能。</p>
<p>由于图像是随机变化的，同时由于本页可供选择的图片很少，因此经常会出现两次显示同一广告的情况。</p>
<p>

<p>
<a href="/example/aspe/advertisements2.txt">
查看 advertisements2.txt
</a>
</p>
</body>
</html>

​x
 
<%
url=Request.QueryString("url")
If url<>"" then Response.Redirect(url)
%>
<html>
<body>
​
<%
set adrotator=Server.CreateObject("MSWC.AdRotator")
adrotator.TargetFrame="target='_blank'"
response.write(adrotator.GetAdvertisement("/example/aspe/advertisements2.txt"))
%>
​
<p><b>注释：</b></p>
<p>本案例因为安全性原因并没有跳转效果，仅供测试，请在实际案例中增加过滤request字符串功能。</p>
<p>由于图像是随机变化的，同时由于本页可供选择的图片很少，因此经常会出现两次显示同一广告的情况。</p>
<p>
​
<p>
<a href="/example/aspe/advertisements2.txt">
查看 advertisements2.txt
</a>
</p>
</body>
</html>