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
 ==============================================================================*/