[原创] dom在QTP测试中的应用

[复制链接]

026300

该用户从未签到

电梯直达

1^#

发表于 2013-8-2 11:40:30 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

最近对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

Browser, Explorer, Explorer, internet, 标签, 技术