link.asp

这个东东叫<掌中无限>的WAP整站程序,但是用不鸟的.. 如果你们可以.改良 ..改良...弄好它..就好啦!

<%
Dim ad01(8)
ad01(0)="<a href='http://ylwap.cn/wap3/list.asp?id=571'>台入伍年龄提前为19岁</a><br/><a href='http://ylwap.cn/wap3/list.asp?id=517'>铁血艳情录游戏攻略</a>"
ad01(1)="<a href='http://ad.waps.cn/ad.jsp?user=8wap'>脱美女上衣欣赏咪咪</a>"
ad01(2)="<a href='http://cota.cn/j?814'>让我高潮就嫁给你[图]</a>"
ad01(3)="<a href='http://ad.qzkk.cn/ad.asp?id=50'>美少女随你挑着玩[爽]</a>"
ad01(4)="<a href='http://downjoy.cn/8@5144'>黄圣依裸体写真HOT</a>"
ad01(5)="<a href='http://un.caishow.com/wap/ad/737.asp?adcid=3296'>偷拍美*女隐私</a>"
ad01(6)="<a href='http://un.caishow.com/wap/ad/322.asp?adcid=3296'>心跳喷*血美图</a>"
ad01(7)="<a href='http://un.caishow.com/wap/ad/184.asp?adcid=3296'>狂野少*女诱惑</a>"
ad01(8)="<a href='http://un.caishow.com/wap/ad/738.asp?adcid=3296'>明星隐*私曝光</a>"
Randomize
I=Int(Rnd()*9)
ad=ad01(i)
Response.Write(ad)
%>