QTP关闭多余的Browser

来源:互联网 发布:java模拟发送http请求 编辑:程序博客网 时间:2024/05/01 13:43
怎么判断打开了几个浏览器窗口:
要判断打开了几个浏览器窗口,使用descrīption对象就可以了,增加几句代码就可以灵活操作,请看代码:
'#############關閉所有IE窗口##############
Dim WinIe,Ie,k,m
WinIe=descrīption.Create()
WinIe("micclass").value="Browser"  '所有页面的regexpwndtitle属性值都是" Microsoft Internet Explorer",也可以用其他属性
Set Ie=desktop.ChildObjects(WinIe)
m=Ie.count
If  m>1 Then
        For k=0 to m-1
        Ie(k).close          ' 0为最后打开的一个,可关闭打开的几个,,循环改成for i=1 to m
       Next
End If
Set ie = nothing
'#############重新打开所需的IE窗口##############
Systemutil.Run "iexplore.exe","http://tw.yahoo.com/index.html"
browser("Yahoo!奇摩").Sync
    如果需要灵活操作,简单的修改下代码就能实现。
原创粉丝点击