VB如何获取一个软件的Internet Explorer_Server的句柄

Question

我试过用FindWindowEx获取但是不行，好像Enumchilewindows和Getwindowsclass能找出他的句柄
高手能不能帮忙给我举个例子！

Answer 1

搞这种东西你的方式不对，建议你了解一下BHO技术，你可以百度一下“vb bho”

Answer 2

用FindWindowEx应该可以的，全用FINDWINDOWEX（HWND，HWND1,VBNULLSTRING,VBNULLSTRING)
有时你指定类还不行，全用NULL反倒行，再按所得到的所有HWND，得到其CLASS，进行比较

Answer 3

我就是用这个方式处理的
'┏〓〓〓〓〓〓〓〓〓 FindHwndByClassAndId,start 〓〓〓〓〓〓〓〓〓┓
'［简介］：
'查找窗体中多层次下第几个相同类的句柄
Function FindHwndByClassAndId(WinHwnd As Long, ByVal Class As String, Optional FindId As Integer, Optional Id As Integer) As Long
   '[mycode_id:1934],edittime:2011/8/3 3:30:07
      Dim Hwnd2 As Long
      Dim FindHwnd As Long, TempFindHwnd As Long
      Hwnd2 = GetWindow(WinHwnd, GW_CHILD)
      While FindHwnd = 0 And Hwnd2 > 0
                  If GetClass(Hwnd2) = Class Then
                       TempFindHwnd = Hwnd2
                       
                       If Id = FindId Then
                           FindHwnd = TempFindHwnd
                           GoTo DoEnd
                       Else
                           Id = Id + 1
                       End If
                   End If
                  
                  FindHwnd = FindHwndByClassAndId(Hwnd2, Class, FindId, Id)
                  Hwnd2 = GetWindow(Hwnd2, GW_HWNDNEXT)
      Wend
   DoEnd:
      FindHwndByClassAndId = FindHwnd
   
End Function
'┗〓〓〓〓〓〓〓〓〓  FindHwndByClassAndId,end  〓〓〓〓〓〓〓〓〓┛

Answer 4

根据类名 Internet Explorer_Server 进行查找

Answer 5

我获取好几个子窗口的子窗口的句柄获取了Internet Explorer_Server的句柄,就是不知如何让Internet Explorer_Server重新定向浏览其他网页

Answer 6

我获取好几个子窗口的子窗口的句柄获取了Internet Explorer_Server的句柄,就是不知如何让Internet Explorer_Server重新定向浏览其他网页根据这个句柄不行的吧。

Answer 7

http://bbs.csdn.net/topics/390540874?page=1#post-395251637给分吧

Answer 8

另外贡献个使用我之前的clsWindows框架的方法，很简便：
Dim w As New clsWindow
If w.GetWindowHwndByTitleEx("应用程序标题栏文字") > 0 Then
    MsgBox w.GetElementHwndByClassName("Internet Explorer_Server") '得到ie控件句柄
End If

Answer 9

用大漠插件 EnumWindow
CString cc=dm.EnumWindow(0,_T(""),_T("Internet Explorer_Server"),2+16);
把cc转换成int,这个int就是句柄了