“天街小雨润如酥，草色遥看近却无。最是一年春好处，绝胜烟柳满皇都。”读一首古诗，心情也随之平静下来

根据页面结构使用描述性编程读取页面中经常变动的内容 ---- 无需依赖对象-1

上一篇 / 下一篇  2008-07-09 11:43:28 / 天气: 晴朗 / 心情: 高兴 / 精华(1) / 置顶(1) / 个人分类：测试工具

查看( 538 ) / 评论( 0 ) / 评分( 0 / 0 )
根据页面结构使用描述性编程读取网页中的链接 --- 无需依赖对象

'在脚本中编写使用哪种浏览器开启哪个网页，这样更方便
InvokeApplication "C:\Program Files\Internet Explorer\IEXPLORE.EXEhttp://www.google.cn/"
 
'定义Browser对象
Dim descBrowser
Set descBrowser = Descrīption.Create()
descBrowser("openurl").value="http://www.google.cn"

'定义Page对象
Dim descPage
Set descPage = Descrīption.Create()
descPage("url").value="http://www.google.cn"

'定义Link对象，也就是要读取的链接
Dim descLink
Set descLink =  Descrīption.Create()
descLink("html tag").value = "A"
 
'找到包含该Link链接的的父对象DIV，然后通过父对象来获取符合条件的子孙数量（此处为：链接的数量），使用index属性循环读取这些链接即可
For i=0 to 1
 set pd_link =  Browser(descBrowser).Page(descPage).WebElement("html tag:=DIV","Class:=left","index:="&i).ChildObjects(descLink)

 For j=0 to pd_link.count()-1
  Browser(descBrowser).Page(descPage).WebElement("html tag:=DIV","Class:=left","index:="&i).Link("index:="&j).click
  Browser(descBrowser).back
 Next

Next

'根据页面结构使用描述性编程读取网页中的链接 --- 无需依赖对象属性，只要知道页面的结构就可以轻松完成，非常方便实用，大家可以用FireFox中的Debug工具来查看页面属性。


收藏 举报

TAG: QTP 对象 测试工具 描述性编程 WebTalbe 页面结构 变动内容

 

评分：0

我来说两句

Open Toolbar