webBrowser 应用编程函数总结

 /*============================说明部分=================================

  实现一下函数需包含头文件

 #include <Wininet.h>

 #include <Shlwapi.h>

 Linker : Wininet.lib  Shlwapi.lib

 =================================================================*/

 /*========================================END========================================*/  

 /*============================说明部分=================================

 清除指定网页Cookie,注意传参,如:www.baidu.com 要写为:baidu.com

 =================================================================*/

 BOOL CleanUrlCache(LPCTSTR lpUrl)

 {

     LPINTERNET_CACHE_ENTRY_INFO lpICEI = NULL;

     DWORD dwSize = ;

     HANDLE hFind = FindFirstUrlCacheEntry(NULL, NULL, &dwSize);

     if (hFind == NULL && GetLastError() != ERROR_INSUFFICIENT_BUFFER)

         return FALSE;  

     lpICEI = (LPINTERNET_CACHE_ENTRY_INFO)new char[dwSize];

     hFind = FindFirstUrlCacheEntry(NULL, lpICEI, &dwSize);

     if (hFind == NULL)

     {

         delete lpICEI;

         return FALSE;

     }  

     do

     {

         if (StrStrI(lpICEI->lpszSourceUrlName, lpUrl))

         {

             int bRet = DeleteUrlCacheEntry(lpICEI->lpszSourceUrlName);

         }

         delete lpICEI;

         lpICEI = NULL;

         dwSize = ;  

         if (!FindNextUrlCacheEntry(hFind, NULL, &dwSize) && GetLastError() != ERROR_INSUFFICIENT_BUFFER)

             break;

         lpICEI = (LPINTERNET_CACHE_ENTRY_INFO)new char[dwSize];

     } while (FindNextUrlCacheEntry(hFind, lpICEI, &dwSize));  

     if (lpICEI != NULL)

         delete lpICEI;

     return TRUE;

 }

 /*========================================END========================================*/  

 /*============================说明部分=================================

 清除IE所有Cookie

 #include <Wininet.h>

 Linker : Wininet.lib

 =================================================================*/

 void   ClearInternetCache()

 {

     DWORD   dwNeeded   =   ;

     FindFirstUrlCacheEntry(NULL,   NULL,   &dwNeeded);    

     if   (GetLastError()   ==   ERROR_INSUFFICIENT_BUFFER)

     {

         unsigned   char   *buffer   =   new   unsigned   char[dwNeeded];

         try

         {

             LPINTERNET_CACHE_ENTRY_INFO   lpicei   =

                 reinterpret_cast<LPINTERNET_CACHE_ENTRY_INFO>(buffer);

             HANDLE   HFind   =     FindFirstUrlCacheEntry(NULL,   lpicei,   &dwNeeded);

             DeleteUrlCacheEntry(lpicei->lpszSourceUrlName);    

             bool   no_more_files   =   false;

             while   (!no_more_files)

             {

                 if   (FindNextUrlCacheEntry(HFind,   lpicei,   &dwNeeded))

                 {

                     DeleteUrlCacheEntry(lpicei->lpszSourceUrlName);

                 }

                 else   switch   (GetLastError())

                 {

 case   ERROR_INSUFFICIENT_BUFFER:

     {

         delete   []   buffer;

         buffer   =   new   unsigned   char[dwNeeded];

         lpicei   =   reinterpret_cast<LPINTERNET_CACHE_ENTRY_INFO>(buffer);

         break;

     }

 default:

     {

         no_more_files   =   true;

         break;

     }

                 }

             }

             FindCloseUrlCache(HFind);

         }

         catch   (...)

         {

             delete   []   buffer;

         }

         delete   []   buffer;

     }

 }  

 /*========================================END========================================*/  

 /*============================说明部分=================================

 CString 转换为 VARIANT 类型

 =================================================================*/

 StringToVariant(CString str)

 {

     VARIANT variant;

     VariantInit(&variant);

     variant.vt=VT_BSTR;

     variant.bstrVal=str.AllocSysString();  

     return variant;

 }

 /*========================================END========================================*/  

 /*============================说明部分=================================

 打开指定URL,其中m_webBrowser 是web browser

 控件关联的控件类型的变量

 =================================================================*/

 OpenURL(LPCTSTR strURL)

 {

     VARIANT vInfo;

     VariantInit(&vInfo);

     CString strHeaders=_T("Content-Type:application/x-WWW-form-urlencoded");

     VARIANT vHeaders=StringToVariant(strHeaders);

     m_webBrowser.Navigate(strURL,&vInfo,&vInfo,&vInfo,&vHeaders);

 }

 /*========================================END========================================*/  

 /*============================说明部分=================================

 向指定ID的HTML标记中输入文字

 strID为标记的ID值

 #include <mshtml.h>

 #include <atlbase.h>

 =================================================================*/

 InputText(CString strID, CComVariant strText)

 {

     HRESULT hr;  

     IDispatch *pDisp;

     pDisp=m_webBrowser.get_Document();  //得到webBrowser控件接口  

     IHTMLDocument2* pDoc;

     hr=pDisp->QueryInterface(IID_IHTMLDocument2,(void**)&pDoc); //得到网页文档接口  

     IHTMLElementCollection* pColl=NULL;

     hr=pDoc->get_all(&pColl);//得到所有网页元素记录集合  

     IDispatch *pDisp2;

     VARIANT index;//用于接收返回元素基于的索引，一般不用，设为0就好，而是用IDispatch 接收元素对象接口

     //V_VT(&index)=VT_I4;

     //V_I4(&index)=0;

     index.vt=VT_I4;

     index.lVal=;  

     VARIANT varID;//要查找的HTML标记ID

     varID=StringToVariant(strID);  

     hr=pColl->item(varID,index,&pDisp2); //找到元素的位置

     if(S_OK==hr&&NULL!=pDisp2)

     {

         IHTMLElement* pElem=NULL;

         hr=pDisp2->QueryInterface(IID_IHTMLElement,(void**)&pElem);  

         if(S_OK==hr&&NULL!=pElem)

         {

             pElem->put_innerText(strText.bstrVal);

             pElem->Release();

         }

         pDisp2->Release();

         pDisp->Release();

     }

 }

 /*========================================END========================================*/

 /*============================说明部分=================================

 点击指定ID值的ＨＴＭＬ按钮

 strID是按钮的ID值

 #include <mshtml.h>

 #include <atlbase.h>

 =================================================================*/

 ClickBtn(CString strID)

 {

     HRESULT hr;

     IDispatch* pDisp;

     pDisp=m_webBrowser.get_Document();//①得到网页控件接口  

     IHTMLDocument2* pDoc;

     hr=pDisp->QueryInterface(IID_IHTMLDocument2,(void**)&pDoc);//②得到网页文档接口  

     IHTMLElementCollection* pColl=NULL;

     hr=pDoc->get_all(&pColl);//③得到网页元素记录集合接口  

     IDispatch* pDisp2;

     VARIANT index;

     //V_VT(&index)=VT_I4;

     //V_I4(&index)=0;

     index.vt=VT_I4;

     index.lVal=;  

     VARIANT varID;

     varID=StringToVariant(strID);  

     hr=pColl->item(varID,index,&pDisp2);//④得到指定HTML标记接口  

     if(S_OK==hr&&NULL!=pDisp2)

     {

         IHTMLElement* pElem=NULL;

         hr=pDisp2->QueryInterface(IID_IHTMLElement,(void**)&pElem);//⑤得到确定元素接口  

         if(S_OK==hr&&NULL!=pElem)

         {

             pElem->click();

             pElem->Release();

         }

         pDisp2->Release();

         pDisp->Release();

     }

 }

 /*========================================END========================================*/

 /*===============================================================

 根据页面Class属性值点击页面元素

 =================================================================*/

 void CPiLiangQianDaoDlg::ClickByClassName()

 {

     IHTMLElementCollection   *objAllElement=NULL;

     IHTMLDocument2   *objDocument=NULL;   

     objDocument=(IHTMLDocument2 *)m_webBrowser.get_Document();

     //由控件得到IHTMLDocument2接口指针  

     objDocument-> get_all(&objAllElement);   //得到网页所有元素的集合  

     IHTMLElement   *   pElem   =   NULL;

     VARIANT   name;

     CComBSTR   tag;

     long     a;

     objAllElement-> get_length(&a);

     name.vt=VT_I4;

     for(int   i=;i <a;i++)//遍历所有元素

     {

         name.lVal   =   i;

         IDispatch   *   pDispatch=NULL;

         objAllElement-> item(name,name,&pDispatch);

         IHTMLElement*   spElement;

         pDispatch-> QueryInterface(IID_IHTMLElement,   (void**)&spElement);

         BSTR   tag;

         spElement->get_className(&tag);

         CString   ss(tag);

         if(ss == "j_signbtn sign_btn2 j_cansign sign0" || ss == "j_signbtn sign_btn2 j_cansign sign1" || ss == "j_signbtn sign_btn2 j_cansign sign6")

             spElement-> click();

     }

 /*=====================================================================================*/

 /*=====================================================================================

 根据网页打开的进程设置进度条

 给web browser添加OnProgressChange响应函数

 m_procCtrl是进度条关联的控件变量

 =======================================================================*/

 if(ProgressMax>)

     m_procCtrl.SetPos(*Progress / ProgressMax);

 //========================================  

 /*====================================================================

 搜索点击页面文字连接

 Str为文字

 =======================================================================*/

 ClickItem(CString str)

 {

     IHTMLElementCollection   *objAllElement=NULL;

     IHTMLDocument2   *objDocument=NULL;   

    objDocument=(IHTMLDocument2 *)m_webBrowser.get_Document();

    //由控件得到IHTMLDocument2接口指针  

     objDocument-> get_all(&objAllElement);   //得到网页所有元素的集合  

     IHTMLElement   *   pElem   =   NULL;

     VARIANT   name;

     CComBSTR   tag;

     long     a;

     objAllElement-> get_length(&a);

     name.vt=VT_I4;

     for(int   i=;i <a;i++)//遍历所有元素

     {

         name.lVal   =   i;

         IDispatch   *   pDispatch=NULL;

         objAllElement-> item(name,name,&pDispatch);

         IHTMLElement*   spElement;

         pDispatch-> QueryInterface(IID_IHTMLElement,   (void**)&spElement);

         BSTR   tag;

         spElement-> get_outerText(&tag);

         CString   ss(tag);

         if(ss=="地图")

             spElement-> click();

     }

 }

 /*=====================================================================================*/

 /*=======================================================================================

 在DocumentCompleteExplorer判断是否为主框架加载完毕

 在页面中有多个框架时会多次触发，可能导致页面中后面的“首页”链接得不到，可以在void   CTest2Dlg::OnDownloadCompleteExplorer1(LPDISPATCH   pDisp,   VARIANT   FAR*   URL)

 加入下面代码：

 ======================================================================================*/CComQIPtr <IWebBrowser2,   &IID_IWebBrowser2>   pWeb; CComQIPtr <IHTMLDocument2,&IID_IHTMLDocument2>   pDoc2; pWeb   =   pDisp; pWeb-> get_Document((IDispatch**)&pDoc2); if   (m_ie.GetDocument()   !=   pDoc2)   return;

 /*==========================================================================*/  

 /*======================================================================

    判断网页是否加载完毕

 ========================================================================*/

 void CPiLiangQianDaoDlg::DocumentCompleteExplorer(LPDISPATCH pDisp, VARIANT* URL)

 {

     // TODO: 在此处添加消息处理程序代码

     if(m_webBrowser.get_ReadyState() == READYSTATE_COMPLETE && times == )

     {

      ((CListBox *)GetDlgItem(IDC_LIST_STATE))->AddString(_T("加载完毕！"));

      m_IsInitDone = ;

      times++;

     }

 }

 /*======================================================================================

  截取网页部分内容，并画图显示

 ======================================================================================*/

 {

 CClientDC hImageDC(GetDlgItem(IDC_EDIT_INFO));  

     HRESULT hr;  

     IDispatch *pDisp;

     pDisp=m_webBrowser.get_Document();  //得到webBrowser控件接口  

     IHTMLDocument2* pDoc;

     hr=pDisp->QueryInterface(IID_IHTMLDocument2,(void**)&pDoc); //得到网页文档接口  

     IHTMLElementCollection* pColl=NULL;

     hr=pDoc->get_all(&pColl);//得到所有网页元素记录集合  

     IDispatch *pDisp2;

     VARIANT index;//用于接收返回元素基于的索引，一般不用，设为就好，而是用IDispatch 接收元素对象接口

     //V_VT(&index)=VT_I4;

     //V_I4(&index)=0;

     index.vt=VT_I4;

     index.lVal=;  

     VARIANT varID;//要查找的HTML标记ID

     varID=StringToVariant(_T("userlike_info_head_img"));  

     hr=pColl->item(varID,index,&pDisp2); //找到元素的位置

     if(S_OK==hr&&NULL!=pDisp2)

     {

         IHTMLElement3* pElem=NULL;

         hr=pDisp2->QueryInterface(IID_IHTMLElement3,(void**)&pElem);

         IHTMLElementRender *pRender =  NULL;

         pElem ->QueryInterface(IID_IHTMLElementRender, (void **) &pRender);

         pRender->DrawToDC(hImageDC);

     }

 }

 /*=================================================================================*/  

 /*=================================================================================

 判断网页是否加在完全(包含框架)

 原理:如果直接早DocummentComple里判断的话,包含多个框架(frame)的网页就会多次激发该函数。所以这里我们这里通过pDish判断是不是主框架的的借口（最后调用该函数），如果是的话就是最后一次激发，表示主框架家在完毕，也就是整个网页加载完毕！

 =====================================================================================*/

 void CTieBaGuajiDlg::DocumentCompleteExplorer1(LPDISPATCH pDisp, VARIANT* URL)

 {

     // TODO: 在此处添加消息处理程序代码

     CComQIPtr <IWebBrowser2,   &IID_IWebBrowser2>   pWeb;

     CComQIPtr <IHTMLDocument2,&IID_IHTMLDocument2>   pDoc2;

     pWeb   =   pDisp;

     pWeb-> get_Document((IDispatch**)&pDoc2);

     if   (m_webBrowser.get_Document()   ==   pDoc2)

     {

           ((CListBox*)GetDlgItem(IDC_LIST_STATE))->AddString(_T("初始化完成！"));

     }

     /////////////////////////////////////////

     /*if(0==m_count)

     {

         ((CListBox*)GetDlgItem(IDC_LIST_STATE))->AddString(_T("初始化完成！"));

         m_count++;

     }*/

 }

 /*=============================================================================*/

 /*==============================================================================

  另外如果不想让webbrowser空间弹出错误提示可以，在对空间资源编辑时设置Slient为TRUE

 ==============================================================================*/
巴特西

webBrowser 应用编程函数总结

最新文章

热门文章
