ҪעliuganExt(http://www.liugan.info)
Install.batע,ɹͿֱASPʹˡ

ASPʹõӣ

Set obj = Server.CreateObject("liuganExt.friendLink")
arr = obj.getLinks(dm)
linkArr = arr(0) 'ӲŵlinkArr
	linkUrl = linkArr(0)(0) 'һӵurl
	linkText = linkArr(0)(1) 'һӵ
	linkUrl = linkArr(1)(0) 'ڶӵurl
	linkText = linkArr(1)(1) 'ڶӵ
	linkUrl = linkArr(2)(0) 'ӵurl
	linkText = linkArr(2)(1) 'ӵ
	.......
	.......
linkCount = arr(1) '
pagecount = arr(2) 'ÿҳ10ӷ֣Էֳɶҳ

baiduShouLu = obj.baidu("www.liugan.info") 'www.liugan.infoİٶ¼
googleShoulu = obj.gegu("www.liugan.info") 'www.liugan.infoİٶ¼
baiduKuaiZhao = obj.kz("www.liugan.info") 'www.liugan.infoİٶȿ
pageRank = obj.pr("www.liugan.info") 'www.liugan.infoPR(עõһPRIframe)

Set obj = nothing

鿴index.asp
