|
首先,我想识别出页面中的ActiveX对象
' browser description
Set browser_des = description.Create
browser_des("micClass").value = "Browser"
browser_des("url").value = TEST_URL
browser_des("application version").value = "internet explorer 6"
' page description
Set page_des = description.Create
page_des("micClass").value = "Page"
' activex object description
Set acx_des = description.Create
acx_des("micclass").value = "ActiveX"
Set acxObjects = Browser(browser_des).Page(page_des).ChildObjects(acx_des)
然后
For i=0 to acxObjects.count-1
logFile.writeline((i+1)&". "&acxObjects(i).getROProperty("name"))
Set testProperties = acxObjects(i).getTOProperties
For j=0 to testProperties.count-1
logFile.writeLine(testProperties(j).Name&" = "&testProperties(j).Value)
Next
Next
发现所有的对象类型都是WebElement了,为什么不是ActiveX呢?
而且其TOProperties只有micclass一种,怎样才能让QTP更好的识别呢?
谢谢了~ |
|