QTP 判断一个浏览器是否已经打开（转载）

上一篇 / 下一篇 2009-01-05 13:14:14 / 个人分类：QuickTestProfessional

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:

查看全部评论