(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。由於百度頁面標簽變化，自己註意替換。

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;
11. lpUnknown = m_web.GetControlUnknown();
12. ASSERT(lpUnknown);
14. if (lpUnknown)
15. {
16. hr = lpUnknown->QueryInterface(IID_IUnknown,(LPVOID*)&lpUnknownWB);
17. ASSERT(SUCCEEDED(hr));
18. if (FAILED(hr))
19. return;
21. hr = pDisp->QueryInterface(IID_IUnknown, (LPVOID*)&lpUnknownDC);
22. ASSERT(SUCCEEDED(hr));
23. if (SUCCEEDED(hr) && lpUnknownWB == lpUnknownDC)
24. {
25. // The document has finished loading.
26. strUrl=m_web.get_LocationURL();
27. if (strUrl.IsEmpty())
28. {
29. return ;
30. }
31. objDocument=(IHTMLDocument2*)m_web.get_Document();
32. objDocument->get_all(&objAllElement);
33. if (strUrl==_T("http://www.baidu.com/"))
34. {
35. CComPtr<IDispatch>pDisp;
36. objAllElement->item(COleVariant(_T("kw1")),COleVariant((long)0),&pDisp);
37. CComQIPtr<IHTMLElement, &IID_IHTMLElement>pElement;
38. if(pDisp==NULL)
39. {
40. return;
41. }
42. else
43. {
44. pElement=pDisp;
45. pElement->put_innerText(_T("測試")); //填充表單
46. }
48. VARIANT name;
49. CComBSTR tag;
50. long index;
51. objAllElement-> get_length(&index);
52. name.vt=VT_I4;
53. for(long i=0; i <index; i++)//遍歷所有元素，通過id屬性獲取值
54. {
55. name.lVal = i;
56. IDispatch * pDispatch=NULL;
57. objAllElement-> item(name,name,&pDispatch);
58. IHTMLElement* spElement;
59. pDispatch-> QueryInterface(IID_IHTMLElement, (void**)&spElement);
60. BSTR tag;
61. spElement->get_id(&tag);
62. CString ss(tag);
63. if(ss == "su1")
64. spElement->click();
66. spElement->Release();
67. }
68. }
69. }
70. }
72. if (lpUnknownWB)
73. lpUnknownWB->Release();
75. if (lpUnknownDC)
76. lpUnknownDC->Release();
77. }</span>

運行可以看到百度自動搜索

附：VS2008平臺源碼下載

利用WebBrowser控件實現百度自動搜索