CoInitialize(NULL);
IWebBrowser2* pWebBrowser2=NULL;
HRESULT hr;
// Explicitly load MSAA so we know if it's installed
HINSTANCE hInst = ::LoadLibrary( _T("OLEACC.DLL") );
if ( hInst )
{
LRESULT lRes;
UINT nMsg = ::RegisterWindowMessage( _T("WM_HTML_GETOBJECT") );
::SendMessageTimeout( hWnd, nMsg, 0L, 0L, SMTO_ABORTIFHUNG, 1000, (DWORD*)&lRes );
LPFNOBJECTFROMLRESULT pfObjectFromLresult = (LPFNOBJECTFROMLRESULT)::GetProcAddress( hInst, _T("ObjectFromLresult") );
if (pfObjectFromLresult)
{
CComPtr<IServiceProvider> spServiceProv;
hr = (*pfObjectFromLresult)( lRes, IID_IServiceProvider, 0, (void**)&spServiceProv );
if ( SUCCEEDED(hr) )
{
hr = spServiceProv->QueryService(SID_SWebBrowserApp,IID_IWebBrowser2,(void**)&pWebBrowser2);
if ( SUCCEEDED(hr) )
{
COleVariant vaUrl(url);
_variant_t v1, v2, v3, v4;
v1.vt = VT_NULL;
v2.vt = VT_NULL;
v3.vt = VT_NULL;
v4.vt = VT_NULL;
pWebBrowser2->Navigate2(&vaUrl, &v1, &v2, &v3, &v4);
}
MessageBox("laiguo");
} // else document not ready
} // else Internet Explorer is not running
::FreeLibrary( hInst );
} // else Active Accessibility is not installed
CoUninitialize();
//return SUCCEEDED(hr) ? pWebBrowser2 : NULL;
IWebBrowser2* pWebBrowser2=NULL;
HRESULT hr;
// Explicitly load MSAA so we know if it's installed
HINSTANCE hInst = ::LoadLibrary( _T("OLEACC.DLL") );
if ( hInst )
{
LRESULT lRes;
UINT nMsg = ::RegisterWindowMessage( _T("WM_HTML_GETOBJECT") );
::SendMessageTimeout( hWnd, nMsg, 0L, 0L, SMTO_ABORTIFHUNG, 1000, (DWORD*)&lRes );
LPFNOBJECTFROMLRESULT pfObjectFromLresult = (LPFNOBJECTFROMLRESULT)::GetProcAddress( hInst, _T("ObjectFromLresult") );
if (pfObjectFromLresult)
{
CComPtr<IServiceProvider> spServiceProv;
hr = (*pfObjectFromLresult)( lRes, IID_IServiceProvider, 0, (void**)&spServiceProv );
if ( SUCCEEDED(hr) )
{
hr = spServiceProv->QueryService(SID_SWebBrowserApp,IID_IWebBrowser2,(void**)&pWebBrowser2);
if ( SUCCEEDED(hr) )
{
COleVariant vaUrl(url);
_variant_t v1, v2, v3, v4;
v1.vt = VT_NULL;
v2.vt = VT_NULL;
v3.vt = VT_NULL;
v4.vt = VT_NULL;
pWebBrowser2->Navigate2(&vaUrl, &v1, &v2, &v3, &v4);
}
MessageBox("laiguo");
} // else document not ready
} // else Internet Explorer is not running
::FreeLibrary( hInst );
} // else Active Accessibility is not installed
CoUninitialize();
//return SUCCEEDED(hr) ? pWebBrowser2 : NULL;