2008/06/05 | 广告轮显组件示例
类别(教程习题) | 评论(0) | 阅读(125) | 发表于 16:26

 压缩包下载

aa.asp

<html>
<body>
<%
Dim Ad
set ad=server.createobject("MSWC.AdRotator")
ad.border=1
ad.clickable=True
ad.targetframe="target='_blank'"
response.write ad.GetAdvertisement("adver.txt")
%>
</body>
</html>

adver.txt

ReDirect bb.asp
Width 440
Height 60
Border 1
*
image/a.png
http://www.google.com
apng
40
image/b.gif
http://www.efg.com
efg
40
image/c.gif
http://www.qq.com
qq
40

bb.asp

<%
 response.redirect request.querystring("URL")
%>


-1

评论Comments