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

在QTP中判断一个网页是否已经被开启

上一篇 / 下一篇  2008-06-30 16:21:35 / 个人分类：测试工具

查看( 815 ) / 评论( 0 ) / 评分( 0 / 0 )
Dim descBrowser
Set descBrowser = Descrīption.Create()
descBrowser("openurl").value = "http://www.google.cn/"

Set child = desktop.ChildObjects(descBrowser)

msgbox child.count()

If child.count()=0 Then
    print "该网页没有被开启"
Else
    For i =1 to child.count()
         child(i-1).close
    Next
End If

收藏 举报

TAG: QTP desktop 网页 开启 测试工具

 

评分：0

我来说两句

Open Toolbar