获取ie窗口的IHTMLDocument2对象

        要想获取网页元素，操作网页的滚动条，获取网页url等，这些操作都必须要通过ie窗口对象IHTMLDocument2来获取相应的元素来实现。
对象IHTMLDocument2的获取代码如下:
HRESULT GetHtmlDom(hwnd m_hCurrentWnd,CComPtr<IHTMLDocument2>m_ptrHtmlDomCurrent)
{
//加载库到内存
HINSTANCE hInst = ::LoadLibrary(_T("OLEACC.DLL"));
if (!hInst)
{
return E_FAIL;
}


LRESULT lRes, lRes1;
UINT nMsg = ::RegisterWindowMessage(_T("WM_HTML_GETOBJECT"));//注册信号


//发送信号
lRes1 = ::SendMessageTimeout(m_hCurrentWnd, nMsg, 0L, 0L, SMTO_ABORTIFHUNG, 1000, (DWORD*)&lRes);
if (!lRes1)
{
::FreeLibrary(hInst);
return E_FAIL;
}
//从指定的库中获取指定函数的地址
LPFNOBJECTFROMLRESULT pfObjectFromLresult = (LPFNOBJECTFROMLRESULT)::GetProcAddress(hInst, _T("ObjectFromLresult"));
if (!pfObjectFromLresult)
{
::FreeLibrary(hInst);
return E_FAIL;
}
//获取m_hCurrentWnd窗口的IHTMLDocument2
HRESULT hr;
hr = ::ObjectFromLresult(lRes, IID_IHTMLDocument2, 0, (LPVOID *)&m_ptrHtmlDomCurrent);
if (hr != S_OK)
{
::FreeLibrary(hInst);
return E_FAIL;
}


::FreeLibrary(hInst);
return S_OK;
}