Using WebBrowser control to implement Baidu automatic search

Transferred from: http://blog.csdn.net/one_in_one/article/details/26372981

(1) Create a new MFC dialog Box project

(2) Add Webbrower Control to the dialog box, Add Method: Click menu Bar Tool, select Toolbox item, and in the Popup Select Toolbox Item dialog box Select COM component->microsoft Web browser-> OK, add to dialog box.

(3) Add the header file and implementation of class CWebBrowser2

Right-click Project, add Class->visual C + +, Mfc->activex control, MFC class, click Add button, add Class from registry source, available ActiveX controls select Microsoft Web browser<1.0>-> Interface Selection iwebbrowser2-> Click > button, click the Finish button, You can add CWebBrowser2.h and CWebBrowser2.cpp to your project, XXXdlg.h contains header files

#include "CWebbrowser2.h", define variable CWebBrowser2 m_web;

(4) XXXdlg.cpp add a control to a variable dynamically bound to the DoDataExchange

DDX_Control (PDX, Idc_explorer1, M_web);

(5) Add the XXXdlg.cpp initialization function

VARIANT VT;

COleVariant vaurl=_t ("http://www.baidu.com");

M_web. Navigate2 (VAURL,&VT,&VT,&VT,&VT);

Run the program, you can see the automatic loading Baidu page.

(6) XXXdlg.h add a statement to further manipulate the page when the page is loaded

Declare_eventsink_map ()

void Documentcompleteexplorer (Lpdispatch pdisp, variant* URL);

(7) Add in XXXdlg.cpp

Begin_eventsink_map (Cbaidudlg, CDialogEx)

On_event (Cbaidudlg, Idc_explorer1, 259, Cbaidudlg::D ocumentcompleteexplorer, Vts_dispatch VTS_PVARIANT)

End_eventsink_map ()

(8) Realizing Documentcompleteexplorer

Analysis Baidu source code can get the input box ID is KW1, the button ID is su1. Due to Baidu page label changes, their own attention to replace.

[CPP]View Plaincopy

2. <span style="FONT-SIZE:18PX;" >void Cbaidudlg::D ocumentcompleteexplorer (lpdispatch pdisp, variant* URL)
4. {
6. HRESULT HR;
8. Lpunknown Lpunknown;
10. Lpunknown LPUNKNOWNWB = NULL;
12. Lpunknown LPUNKNOWNDC = NULL;
14. IHTMLElementCollection *objallelement=null;
16. IHTMLDocument2 *objdocument=null;
18. CString strurl,strtemp;
22. Lpunknown = M_web. GetControlUnknown ();
24. ASSERT (Lpunknown);
28. if (lpunknown)
30. {
32. hr = Lpunknown->queryinterface (IID_IUnknown, (lpvoid*) &LPUNKNOWNWB);
34. ASSERT (SUCCEEDED (HR));
36. if (FAILED (HR))
38. return;
42. hr = Pdisp->queryinterface (IID_IUnknown, (lpvoid*) &LPUNKNOWNDC);
44. ASSERT (SUCCEEDED (HR));
46. if (SUCCEEDED (hr) && LPUNKNOWNWB = = LPUNKNOWNDC)
48. {
50. //The document has finished loading.
52. Strurl=m_web.get_locationurl ();
54. if (Strurl.isempty ())
56. {
58. return;
60. }
62. Objdocument= (ihtmldocument2*) m_web.get_document ();
64. Objdocument->get_all (&objallelement);
66. if (strurl==_t ("http://www.baidu.com/"))
68. {
70. ccomptr<idispatch>pdisp;
72. Objallelement->item (COleVariant (_t ("KW1")), COleVariant ((long) 0), &pdisp);
74. Ccomqiptr<ihtmlelement, &IID_IHTMLElement>pElement;
76. if (pdisp==null)
78. {
80. return;
82. }
84. Else
86. {
88. Pelement=pdisp;
90. Pelement->put_innertext (_t ("test")); //Fill out form
92. }
96. VARIANT name;
98. CComBSTR tag;
100. long Index;
102. Objallelement-> get_length (&index);
104. NAME.VT=VT_I4;
106. for (long i=0; I <index; i++)//Traverse all elements, get value by ID property
108. {
110. Name.lval = i;
112. IDispatch * PDISPATCH=NULL;
114. Objallelement-> item (Name,name,&pdispatch);
116. ihtmlelement* spelement;
118. Pdispatch-> QueryInterface (Iid_ihtmlelement, (void**) &spelement);
120. BSTR tag;
122. SPELEMENT->GET_ID (&tag);
124. CString SS (TAG);
126. if (ss = = "su1")
128. Spelement->click ();
132. Spelement->release ();
134. }
136. }
138. }
140. }
144. if (LPUNKNOWNWB)
146. Lpunknownwb->release ();
150. if (LPUNKNOWNDC)
152. Lpunknowndc->release ();
154. }</span>

Run can see Baidu automatic search

Attached: VS2008 platform Source Download

Using WebBrowser control to implement Baidu automatic search