51Testing软件测试论坛

标题: 遍历浏览器返回值为0 [打印本页]

---

作者: suroit    时间: 2013-5-29 20:30
标题: 遍历浏览器返回值为0
大家好，今天在学习QTP的过程中看见有如下方法可以枚举IE浏览器
Function EnumerateIE()
        Dim allWindows,oWindow,wShell
        On ERROR RESUME NEXT
        Set EnumerateIE = CreateObject("Scripting.Dictionary")
        Set wShell = CreateObject("Shell.Application")
        Set allWindows = wShell.Windows
        For each oWindow in allWindows
                If InStr(1,oWindow.FullName,"iexplore.exe",vbTextCompare) Then
                        EnumerateIE.Add oWindow.hwnd,oWindow
                End If
        Next
        MsgBox EnumerateIE.Count
End Function

Call EnumerateIE()
但是当我把"iexplore.exe" 替换成"chrome.exe"的时候显示EnumerateIE.Count=0，请问是为什么呢？
2.我想通过VBS/QTP获得当前窗口的名称，这个窗口可能是JAVAWINDOW,也可能是普通的Windows窗口，请问该怎么实现呢？我的思路是通过extern对象遍历当前所有窗口并获得HWND，如果其中一个窗口的HWND和获得的HWND一致，则认为找到目标窗口。但是如何获得目标窗口的名称呢？希望得到大家的帮助

---

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)

Powered by Discuz! X3.2