测链接

namedxf

ＱＴＰ有遍历测链接的功能吗？是不是要参数化或是描述性编程，当然我要测的网站有上千个链接的，其中有的链接是系统自动生成的，有的是手动添加．请教最简单有效的方法．谢谢！

wangyanzhao

回复 4# cc_qq_yy


    支持

pirate

板砖

tiger_86

你们都太强大了
在下佩服佩服！
:'(

cafard-haibin

你看附件中的工具能满足你需求吗？这个专门是来测试web链接的。发不上了。太大了。名字叫：Xenu

cc_qq_yy

Set oDes=Desription.Creat()
oDes("type").Value="Link"
Set ObjList=Browser("").Page("").ChildObjects(oDes)
ObjCount=ObjList.count
for i=0 to ObjCount-1
    If ObjList(i).WaitProperty("visible",True,1000) Then
         ObjList(i).Click
    End If
Next

namedxf

哦，谢谢，我试一下！

lantianwei

Set oDesc = Description.Create()
oDesc("html tag").Value = "A"
Set Lists =Browser("Browser").Page("百度搜索").ChildObjects(oDesc)
NumberOfLists = Lists.Count()
For i = 0 To NumberOfLists - 1
        Lists(i).click
Next