026300 发表于 2013-8-2 11:40:30

dom在QTP测试中的应用

最近对DOM技术做了一次小结,部分知识在QTP中的应用实验如下,感兴趣的tx可以参考,会给功能测试带来极大的便利。

'首先找到所需对象所在的page
With Browser("*").Page("*").
        Set oDom = .Object
End With

' 循环获取Page中的所有元素
For each Node In oDom.all
   tagName = Node.TagName ' 获取标签名
   innerHTML = Node.innerHTML ' 获取innerHTML
   If innerHTML ="abcd" and tagName = "DIV" Then'本例是查找符合条件的DIV并打开网页
    SystemUtil.Run "C:\Program Files\Internet Explorer\iexplore.exe",         "http://IP:port" & Node.previousSibling.getAttribute("Link", false)
   End if
页: [1]
查看完整版本: dom在QTP测试中的应用