本程序需要注册加载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.info的PR(注意这里获得的是一个含有PR的Iframe)
Set obj = nothing
更多查看index.asp
