QTP中Description对象使用的一点经验

QTP中Description对象使用的一点经验 欢迎进入软件测试社区论坛，与200万技术人员互动交流 >>进入
我们在用QTP进行自动化脚本开发的时候，经常会要使用到Descrīption对象，但是在使用Descrīption时，却有一个问题，那就是在得到
了所有子对象后，进行循环点击时，经常会循环几次后，就报generic
error而使脚本不能再往下执行,开始的时候很不明白，为什么会出现这种情况，后来经过找资料和自己实践，终于搞清楚了原因，先看代码：Set ōDesc=Descrīption.Create()
oDesc("micclass").Value ="Link"
Set Lists=Browser("Yahoo!奇摩").Page("Yahoo!奇摩").ChildObjects(oDesc)
no = Lists.count - 1
For i = 0 To no
no = Lists.count - 1
Print i & Lists(i).GetRoProperty("innertext") & ":" & Lists(i).GetROProperty("url")
If instr(1,Lists(i).GetROProperty("url"),"http") = 1 Then
Lists(i).Click
Dialog("Connect to tw.yahoo.com").WinButton("Cancel").Click @@ hightlight id_;_395324_;_scrīpt infofile_;_ZIP::ssf21.xml_;_
Browser("Yahoo!
奇摩").Page("Yahoo!奇摩").Sync @@ hightlight
id_;_Browser("Yahoo!奇摩").Page("Yahoo!奇摩")_;_scrīpt
infofile_;_ZIP::ssf22.xml_;_
Browser("Yahoo!奇摩").Close
If Lists(i).GetRoProperty("innertext") = "寬窄頁面切換" Then
i = i -1
End If
else
Services.LogMessage Lists(i).GetRoProperty("innertext") & "没有URL" , ErrorMsg
End If
Browser("Yahoo!奇摩").Sync

if Browser("Yahoo!奇摩").Page("Yahoo!奇摩").WebElement("notopenthelink").Exist(3) Then
Services.LogMessage i & Lists(i).GetRoProperty("innertext") & "連結錯誤" , ErrorMsg
'sheetNew.cells(j+1,1).value = Lists(i).GetROProperty(text)
'sheetNew.cells(j+1,2).value = Lists(i).GetROProperty(url)
End If
Browser("Yahoo!奇摩").Navigate("http://tw.yahoo.com/index.html")
Browser("Yahoo!奇摩").Sync
这个循环在运行几次后就会报错，我们只要在for循环下面加上一句：
Set Lists=Browser("Yahoo!奇摩").Page("Yahoo!奇摩").ChildObjects(oDesc)
这样就不会报错了，原因是因为Lists是一个数组，在第一次赋给页面子对象以后，运行几次就会丢失对象，这样在再继续循环就会报错，这也可以算是QTP本身的一个BUG,所以各位朋友在以后用这个对象时要注意这个地方，谢谢啦！