VC Webbrowser操作全解（一）_综合

最近这段时间在研究Webbrowser控件，并使用Webbrowser控件实现了对某些网页自动化管理的功能，以下是对这段时间研究结果的总结：

一、Webbrowser控件详解：

（1）通过Webrowser 查找指定元素控件（IHTMLElement）

//通过ID 获取对应页面元素IDispatch* CWebBrowserEx::GetElementByName(LPCTSTR idorName, LPCTSTR lpIFramName, IID clID){IDispatch *retElement = NULL;IDispatch* dispatch = NULL;HRESULT hr = S_FALSE;CComPtr<IHTMLDocument2> doc;do{if (lpIFramName){CComPtr<IHTMLIFrameElement> pIFrame = NULL;pIFrame = (IHTMLIFrameElement*)GetElementByName(lpIFramName, (LPCTSTR)NULL, IID_IHTMLIFrameElement);if (pIFrame == NULL) break;CComQIPtr< IHTMLFrameBase2 > pFrameBase = pIFrame;CComPtr<IHTMLWindow2> spIframeWindow2 = NULL;if (pFrameBase == NULL) break;hr = pFrameBase->get_contentWindow(&spIframeWindow2);if (FAILED(hr))break;hr = spIframeWindow2->get_document(&doc);if (FAILED(hr))break;}else{hr = m_pWebBrowser2->get_Document(&dispatch);if ((S_OK == hr) && (0 != dispatch)){dispatch->QueryInterface(IID_IHTMLDocument2, (void**)&doc);dispatch->Release();}}if (doc == NULL ) break;CComQIPtr<IHTMLElementCollection> doc_all;hr = doc->get_all(&doc_all);      // this is like doing document.allif (FAILED( hr)) break;VARIANT vKey;vKey.vt = VT_BSTR;vKey.bstrVal = SysAllocString(idorName);VARIANT vIndex;VariantInit(&vIndex);hr = doc_all->item(vKey, vIndex, &dispatch);       // this is like doing document.all["messages"]//清理SysFreeString(vKey.bstrVal);VariantClear(&vKey);VariantClear(&vIndex);if ((S_OK == hr) && (0 != dispatch)){hr = dispatch->QueryInterface(clID, (void **)&retElement); // it's the caller's responsibility to release if (S_OK != hr) retElement = NULL;dispatch->Release();}} while (0);return retElement;}
//通过Tag 获取对应控件，eg: <input onclick="clieck_login()" /> 可以通过onclick 这个属性获
//取对应的控件IDispatch* CWebBrowserEx::GetElementByTag(LPCTSTR tagName, LPCTSTR PropertyName, LPCTSTR macthValue, LPCTSTR lpIFramName, IID clID){IDispatch *retElement = NULL;IDispatch* dispatch = NULL;CComPtr<IHTMLDocument2> doc;HRESULT hr = S_FALSE;CComQIPtr<IHTMLElementCollection> doc_all;do{if (m_pWebBrowser2 == NULL ) break;if (lpIFramName){CComPtr<IHTMLIFrameElement> pIFrame = NULL;pIFrame = (IHTMLIFrameElement*)GetElementByName(lpIFramName, (LPCTSTR)NULL, IID_IHTMLIFrameElement);if (pIFrame == NULL) break;CComQIPtr< IHTMLFrameBase2 > pFrameBase = pIFrame;CComPtr<IHTMLWindow2> spIframeWindow2 = NULL;if (pFrameBase == NULL ) break;hr = pFrameBase->get_contentWindow(&spIframeWindow2);if (FAILED(hr)) break;hr = spIframeWindow2->get_document(&doc);if (FAILED(hr)) break;}else{hr = m_pWebBrowser2->get_Document(&dispatch);if ((S_OK == hr) && (0 != dispatch)){dispatch->QueryInterface(IID_IHTMLDocument2, (void**)&doc);dispatch->Release();}}if (doc == NULL ) break;hr = doc->get_all(&doc_all);      // this is like doing document.allif (FAILED( hr) ) break;VARIANT vKey;vKey.vt = VT_BSTR;vKey.bstrVal = SysAllocString(tagName);VARIANT vIndex;VariantInit(&vIndex);hr = doc_all->tags(vKey, &dispatch);       // this is like doing document.all["messages"]//清理SysFreeString(vKey.bstrVal);VariantClear(&vKey);VariantClear(&vIndex);if (FAILED(hr) || (NULL == dispatch)) break;CComQIPtr< IHTMLElementCollection > all_tags = dispatch;dispatch->Release();if (all_tags == NULL ) break;long nTagsCount = 0; //hr = all_tags->get_length(&nTagsCount);if (FAILED(hr)) break;for (long i = 0; i < nTagsCount; i++){CComDispatchDriver spInputElement; //取得第 i 项hr = all_tags->item(CComVariant(i), CComVariant(i), &spInputElement);if (FAILED(hr))continue;CComVariant vValue;hr = spInputElement.GetPropertyByName(PropertyName, &vValue);if (VT_EMPTY != vValue.vt){LPCTSTR lpValue = vValue.bstrVal ?OLE2CT(vValue.bstrVal) : NULL;if (NULL == lpValue)continue;std::wstring cs = L"";if (vValue.vt == VT_DISPATCH){CComPtr<IDispatch> varCon = vValue.pdispVal;VARIANT varResult = { 0 };DISPPARAMS params = { NULL, NULL, 0, 0 };varCon->Invoke(0, IID_NULL, LOCALE_USER_DEFAULT, DISPATCH_PROPERTYGET, &params, &varResult, NULL, NULL);cs = varResult.bstrVal;int nPos = cs.find(L"{\n");if (nPos != std::string::npos){cs = cs.substr(nPos + 2, cs.size() - nPos - 2);}nPos = cs.rfind(L"\n}");if (nPos != std::string::npos){cs = cs.substr(0, nPos);}}else if (vValue.vt == VT_BSTR){LPCTSTR lpValue = vValue.bstrVal ?OLE2CT(vValue.bstrVal) : NULL;if (lpValue != NULL){cs = (LPCTSTR)lpValue;}}if (cs.size() == 0)continue;if (0 == _tcscmp(cs.c_str(), macthValue)){hr = spInputElement->QueryInterface(clID, (void **)&retElement);if (S_OK != hr) retElement = NULL;break;}}}} while (0);return retElement;}
//通过ID 获取对应页面元素IDispatch* CWebBrowserEx::GetElementByName(LPCTSTR pElementName, IHTMLIFrameElement* pIFrameElement, IID clID){IDispatch *retElement = NULL;IDispatch* dispatch = NULL;HRESULT hr = S_FALSE;CComPtr<IHTMLDocument2> doc;do{if (pIFrameElement == NULL ) break;if (pElementName == NULL ) break;CComQIPtr< IHTMLFrameBase2 > pFrameBase = pIFrameElement;CComPtr<IHTMLWindow2> spIframeWindow2 = NULL;if (pFrameBase == NULL) break;hr = pFrameBase->get_contentWindow(&spIframeWindow2);if (FAILED(hr))break;hr = spIframeWindow2->get_document(&doc);if (FAILED(hr))break;if (doc == NULL ) break;CComQIPtr<IHTMLElementCollection> doc_all;hr = doc->get_all(&doc_all);      // this is like doing document.allif (FAILED( hr)) break;VARIANT vKey;vKey.vt = VT_BSTR;vKey.bstrVal = SysAllocString(pElementName);VARIANT vIndex;VariantInit(&vIndex);hr = doc_all->item(vKey, vIndex, &dispatch);       // this is like doing document.all["messages"]//清理SysFreeString(vKey.bstrVal);VariantClear(&vKey);VariantClear(&vIndex);if ((S_OK == hr) && (0 != dispatch)){hr = dispatch->QueryInterface(clID, (void **)&retElement); // it's the caller's responsibility to release if (S_OK != hr) retElement = NULL;dispatch->Release();}} while (0);return retElement;}
//通过Tag 获取对应控件，eg: <input onclick="clieck_login()" /> 可以通过onclick 这个属性获
//取对应的控件IDispatch* CWebBrowserEx::GetElementByTag(LPCTSTR tagName, LPCTSTR PropertyName, LPCTSTR macthValue, IHTMLIFrameElement* pIFrameElement, IID clID){IDispatch *retElement = NULL;IDispatch* dispatch = NULL;CComPtr<IHTMLDocument2> doc;HRESULT hr = S_FALSE;CComQIPtr<IHTMLElementCollection> doc_all;do{if (m_pWebBrowser2 == NULL) break;if (pIFrameElement == NULL ) break;CComQIPtr< IHTMLFrameBase2 > pFrameBase = pIFrameElement;CComPtr<IHTMLWindow2> spIframeWindow2 = NULL;if (pFrameBase == NULL) break;hr = pFrameBase->get_contentWindow(&spIframeWindow2);if (FAILED(hr)) break;hr = spIframeWindow2->get_document(&doc);if (FAILED(hr)) break;if (doc == NULL ) break;hr = doc->get_all(&doc_all);      // this is like doing document.allif (FAILED( hr )) break;VARIANT vKey;vKey.vt = VT_BSTR;vKey.bstrVal = SysAllocString(tagName);VARIANT vIndex;VariantInit(&vIndex);hr = doc_all->tags(vKey, &dispatch);       // this is like doing document.all["messages"]//清理SysFreeString(vKey.bstrVal);VariantClear(&vKey);VariantClear(&vIndex);if (FAILED(hr) || (NULL == dispatch)) break;CComQIPtr< IHTMLElementCollection > all_tags = dispatch;dispatch->Release();if (all_tags == NULL ) break;long nTagsCount = 0; //hr = all_tags->get_length(&nTagsCount);if (FAILED(hr)) break;for (long i = 0; i < nTagsCount; i++){CComDispatchDriver spInputElement; //取得第 i 项hr = all_tags->item(CComVariant(i), CComVariant(i), &spInputElement);if (FAILED(hr))continue;CComVariant vValue;hr = spInputElement.GetPropertyByName(PropertyName, &vValue);if (VT_EMPTY == vValue.vt) continue;std::wstring cs = L"";if (vValue.vt == VT_DISPATCH){CComPtr<IDispatch> varCon = vValue.pdispVal;VARIANT varResult = { 0 };DISPPARAMS params = { NULL, NULL, 0, 0 };varCon->Invoke(0, IID_NULL, LOCALE_USER_DEFAULT, DISPATCH_PROPERTYGET, &params, &varResult, NULL, NULL);cs = varResult.bstrVal;int nPos = cs.find(L"{\n");if (nPos != std::string::npos){cs = cs.substr(nPos + 2, cs.size() - nPos - 2);}nPos = cs.rfind(L"\n}");if (nPos != std::string::npos){cs = cs.substr(0, nPos);}}else if (vValue.vt == VT_BSTR){LPCTSTR lpValue = vValue.bstrVal ?OLE2CT(vValue.bstrVal) : NULL;if (lpValue != NULL){cs = (LPCTSTR)lpValue;}}if (cs.size() == 0)continue;if (0 == _tcscmp(cs.c_str(), macthValue)){hr = spInputElement->QueryInterface(clID, (void **)&retElement);if (FAILED(hr)) retElement = NULL;break;}}} while (0);return retElement;}

（2） NewWindows3 多页面实现

需要实现多页面或者URL在同页面打开这个功能，需要在Invoke中响应DISPID_NEWWINDOW3这个消息。

	void CWebBrowserEx::NewWindow3(IDispatch **pDisp, VARIANT_BOOL *&Cancel, DWORD dwFlags, BSTR bstrUrlContext, BSTR bstrUrl){//*Cancel = FALSE;   //注意如果要使用系统自带的界面弹框，则设置成FALSECWebBrowserEx* pNewBrowser = DoCreateWeb(bstrUrl, pDisp);pNewBrowser->GetWebBrowser2()->get_Application(pDisp);DUITRACE(_T("[WebBrowserEx]创建页面成功！\n"));*Cancel = TRUE;}

（3）查看对应元素的HTML数据

可以通过获取当前元素节点的 IHTMLElement 对象，然后通过接口get_innerHTML 或者 get_outerHTML获取HTML数据

//查看元素节点HTML
CComPtr<IHTMLElementCollection> pBody;
HRESULT hr = pElement->get_tBodies(&pBody);
if (FAILED(hr)) break;long lNum = 0;
pBody->get_length(&lNum);
CComPtr<IHTMLDOMNode> node_tdnum = NULL;
for (int i = 0; i < lNum; i++)
{CComDispatchDriver spInputElement; //取得第 i 项HRESULT hr = pBody->item(CComVariant(i), CComVariant(i), &spInputElement);if (FAILED(hr))continue;CComPtr<IHTMLElement> pItem;hr = spInputElement->QueryInterface(IID_IHTMLElement, (void**)&pItem);if (FAILED(hr)) continue;BSTR strName;pItem->get_outerHTML(&strName);OutputDebugString(strName);}

二、对网页的操作

请参考《VC Webbrowser操作全解（二）》