获取IWebBrowser2指针的方法（一）

最新推荐文章于 2023-04-01 16:31:05 发布

浪里狼

最新推荐文章于 2023-04-01 16:31:05 发布

阅读量1.2k

点赞数

分类专栏： windows编程文章标签：浏览器 IWebBrowser2 webbrowser windows编程

windows编程专栏收录该内容

29 篇文章 0 订阅

订阅专栏

在Internet Explorer编程中，获取WebBrowser指针通常是一件很重要的事情，因为有了WebBrowser指针，我们就有了对IE完整的控制权。我们就可以对IE浏览器为所欲为了，想干什么都可以。比方说获取或者设置DOM控件的值。调用页面中的JavaScript，或者控制浏览器的行为比方说刷新，前进、后退等等等等。。

下面两篇文章中，我将介绍两种方法来获取IWebBrowser2指针。

第一种

使用OLEACC.dll动态库中的ObjectFromLresult函数来获取。

第二种

使用IShellWindows 获取当前浏览器个数，然后遍历获取浏览器对象和IWebBrowser指针。

参见：获取IWebBrowser2指针的方法（二）

下面介绍第一种方法：

在MSDN中对ObjectFromLresult函数的解释

The LresultFromObject function returns a reference, that is similar to a handle, to the specified object. Servers return this reference when handling WM_GETOBJECT.

所以就必须要调用::RegisterWindowMessage( _T("WM_HTML_GETOBJECT") );和SendMessageTimeout返回的与WM_GETOBJECT消息关联的值。这样就可以利用ObjectFromLresult来获取IHTMLDocument2指针，有了IHTMLDocument2，剩下的事情就是QueryInterface来获取IWebBrowser2指针，这样就很轻松了。

下面看下代码：

//用来接收EnumChildWindows的回调函数
//根据类名Internet Explorer_Server来判断是否是Internet Explorer控件
BOOL CALLBACK EnumChildProc(HWND hwnd,LPARAM lParam) 
{
	TCHAR buf[100];
	::GetClassName( hwnd, (LPTSTR)&buf, 100 );
	if ( _tcscmp( buf, _T("Internet Explorer_Server") ) == 0 ) 
	{
		*(HWND*)lParam = hwnd; return FALSE; 
	} 
	else return TRUE; 
};
IWebBrowser2* GetWBByhWnd(HWND hIEWindow) 
{
	CoInitialize( NULL );
	// Explicitly load MSAA so we know if it's installed 
	HINSTANCE hInst = ::LoadLibrary( _T("OLEACC.DLL") );
	IWebBrowser2* pWebBrowser2=NULL;
	if ( hInst != NULL ) 
	{ 
		HWND hWnd ;
		if(hIEWindow==NULL)
		{
			hWnd= FindWindow("IEFrame", NULL);
			if(hWnd==NULL)
				hWnd= FindWindow("CabinetWClass", NULL);
			if( hWnd == NULL)
			{
				MessageBox (NULL,"No Running instance of Internet Explorer!","message", MB_OK);
			}
			// walk Shell DocObject View->Internet Explorer_Server
			HWND hWndChild = FindWindowEx(hWnd, 0, "Shell DocObject View", NULL);
			if(hWndChild !=0)
			{
				hWndChild = FindWindowEx(hWndChild, 0, "Internet Explorer_Server", NULL);
			}
			hWnd=hWndChild;
		}
		else
		{
			hWnd = hIEWindow;
			HWND hWndChild=NULL; 
			// Get 1st document window 
			EnumChildWindows( hWnd, EnumChildProc, (LPARAM)&hWndChild ); 
			if ( hWndChild ) 
			{
				CComPtr<IHTMLDocument2> spDoc;
				LRESULT lRes; 
				UINT nMsg = ::RegisterWindowMessage( _T("WM_HTML_GETOBJECT") );
				::SendMessageTimeout( hWndChild, nMsg, 0L, 0L, SMTO_ABORTIFHUNG, 1000, (DWORD*)&lRes ); 
				LPFNOBJECTFROMLRESULT pfObjectFromLresult = (LPFNOBJECTFROMLRESULT)::GetProcAddress( hInst, _T("ObjectFromLresult") );
				if ( pfObjectFromLresult != NULL ) 
				{
					HRESULT hr;
					hr = (*pfObjectFromLresult)( lRes, IID_IHTMLDocument2, 0, (void**)&spDoc );
					if ( SUCCEEDED(hr) ) 
					{
						CComPtr<IHTMLWindow2>spWnd2;
						CComPtr<IServiceProvider>spServiceProv;
						hr=spDoc->get_parentWindow ((IHTMLWindow2**)&spWnd2);
						if(SUCCEEDED(hr))
						{
							hr=spWnd2->QueryInterface (IID_IServiceProvider,(void**)&spServiceProv);
							if(SUCCEEDED(hr))
							{
								hr = spServiceProv->QueryService(SID_SWebBrowserApp,IID_IWebBrowser2,(void**)&pWebBrowser2);
								if(SUCCEEDED(hr))
								{
									return pWebBrowser2;
								}
								
							}
						}
					}
				}
			} // else document not ready 
		} // else Internet Explorer is not running 
		::FreeLibrary( hInst ); 
	} // else Active Accessibility is not installed 
	CoUninitialize(); 
	return NULL;
}

转载：http://blog.csdn.net/tingsking18/article/details/4620065