[分享广告轮显代码
文本文件8-1.txt
redirect 8-2.asp
width 240
height 360
border 1
*
1.gif
http://www.chinaren.com/
中国人的主页
2
2.gif
http://www.sina.com/
新浪
3
3.gif
http://www.njtu.edu.cn/
北方交通
4
4.gif
http://www.sohu.com/
搜户
1
8-1.asp
<%
Set ad=Server.CreateObject("MSWC.AdRotator")
ad.Clickable=(true)
%>
<%=ad.GetAdvertisement("8-1.txt")%>
8-2.asp
<%
URL=Request("URL")
Response.Redirect URL
%>
redirect 8-2.asp
width 240
height 360
border 1
*
1.gif
http://www.chinaren.com/
中国人的主页
2
2.gif
http://www.sina.com/
新浪
3
3.gif
http://www.njtu.edu.cn/
北方交通
4
4.gif
http://www.sohu.com/
搜户
1
8-1.asp
<%
Set ad=Server.CreateObject("MSWC.AdRotator")
ad.Clickable=(true)
%>
<%=ad.GetAdvertisement("8-1.txt")%>
8-2.asp
<%
URL=Request("URL")
Response.Redirect URL
%>
[此贴子已经被作者于2006-3-5 16:12:27编辑过]