QTP關閉多餘的Browser

怎麼判斷打開了幾個瀏覽器窗口:
要判斷打開了幾個瀏覽器窗口,使用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
    如果需要靈活操作,簡單的修改下代碼就能實現。
發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章