利用WebBrowser控件实现百度自动搜索

(1)新建一个MFC对话框项目

(2)对话框中添加WebBrower控件，添加方法：点击菜单栏工具->选择工具箱项->在弹出的选择工具箱项对话框选择COM组件->Microsoft Web Browser->确定，添加到对话框中即可。

(3)添加类CWebBrowser2的头文件和实现

右键点击项目->添加->类->Visual C++ -> MFC->ActiveX控件中的MFC类->点击添加按钮->从注册表来源添加类，可用的ActiveX控件选择Microsoft Web Browser<1.0>->接口选择IWebBrowser2->点击>按钮->点击完成按钮，就可以将CWebBrowser2.h和CWebBrowser2.cpp添加到项目中，XXXdlg.h中包含头文件

#include "CWebbrowser2.h"，定义变量CWebBrowser2 m_web;

(4)XXXdlg.cpp的DoDataExchange中添加将控件与变量动态绑定

DDX_Control(pDX, IDC_EXPLORER1, m_web);

(5)XXXdlg.cpp的初始化函数中添加

VARIANT vt;

COleVariant vaUrl=_T("http://www.baidu.com");

m_web.Navigate2(vaUrl,&vt,&vt,&vt,&vt);

运行程序，可以看到自动加载百度页面。

(6)XXXdlg.h中添加一下声明，用于当页面加载完成后进一步操作页面

DECLARE_EVENTSINK_MAP()

void DocumentCompleteExplorer(LPDISPATCH pDisp, VARIANT* URL);

(7)XXXdlg.cpp中添加

BEGIN_EVENTSINK_MAP(CbaiduDlg, CDialogEx)

ON_EVENT(CbaiduDlg, IDC_EXPLORER1, 259, CbaiduDlg::DocumentCompleteExplorer, VTS_DISPATCH VTS_PVARIANT)

END_EVENTSINK_MAP()

(8)实现DocumentCompleteExplorer

分析百度源码可以得到输入框的id是kw1，按钮的id是su1。由于百度页面标签变化，自己注意替换。

[cpp] view plain copy

1. <span style="font-size:18px;">void CbaiduDlg::DocumentCompleteExplorer(LPDISPATCH pDisp, VARIANT* URL)
2. {
3. HRESULT   hr;
4. LPUNKNOWN lpUnknown;
5. LPUNKNOWN lpUnknownWB = NULL;
6. LPUNKNOWN lpUnknownDC = NULL;
7. IHTMLElementCollection *objAllElement=NULL;
8. IHTMLDocument2 *objDocument=NULL;
9. CString strUrl,strTemp;
10. lpUnknown = m_web.GetControlUnknown();
11. ASSERT(lpUnknown);
12. if (lpUnknown)
13. {
14. hr = lpUnknown->QueryInterface(IID_IUnknown,(LPVOID*)&lpUnknownWB);
15. ASSERT(SUCCEEDED(hr));
16. if (FAILED(hr))
17. return;
18. hr = pDisp->QueryInterface(IID_IUnknown, (LPVOID*)&lpUnknownDC);
19. ASSERT(SUCCEEDED(hr));
20. if (SUCCEEDED(hr) && lpUnknownWB == lpUnknownDC)
21. {
22. // The document has finished loading.
23. strUrl=m_web.get_LocationURL();
24. if (strUrl.IsEmpty())
25. {
26. return ;
27. }
28. objDocument=(IHTMLDocument2*)m_web.get_Document();
29. objDocument->get_all(&objAllElement);
30. if (strUrl==_T("http://www.baidu.com/"))
31. {
32. CComPtr<IDispatch>pDisp;
33. objAllElement->item(COleVariant(_T("kw1")),COleVariant((long)0),&pDisp);
34. CComQIPtr<IHTMLElement, &IID_IHTMLElement>pElement;
35. if(pDisp==NULL)
36. {
37. return;
38. }
39. else
40. {
41. pElement=pDisp;
42. pElement->put_innerText(_T("测试")); //填充表单
43. }
44. VARIANT   name;
45. CComBSTR   tag;
46. long     index;
47. objAllElement-> get_length(&index);
48. name.vt=VT_I4;
49. for(long i=0; i <index; i++)//遍历所有元素，通过id属性获取值
50. {
51. name.lVal   =   i;
52. IDispatch   *   pDispatch=NULL;
53. objAllElement-> item(name,name,&pDispatch);
54. IHTMLElement*   spElement;
55. pDispatch-> QueryInterface(IID_IHTMLElement,   (void**)&spElement);
56. BSTR   tag;
57. spElement->get_id(&tag);
58. CString   ss(tag);
59. if(ss == "su1")
60. spElement->click();
61. spElement->Release();
62. }
63. }
64. }
65. }
66. if (lpUnknownWB)
67. lpUnknownWB->Release();
68. if (lpUnknownDC)
69. lpUnknownDC->Release();
70. }</span>

运行可以看到百度自动搜索

附：VS2008平台源码下载