VC++ webbrowser函数使用范例

其他 2019-03-11 13:01:23 阅读次数: 0

分享一下我老师大神的人工智能教程吧。零基础！通俗易懂！风趣幽默！还带黄段子！希望你也加入到我们人工智能的队伍中来！http://www.captainbed.net

/*============================说明部分================================= 
 实现一下函数需包含头文件 
#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 = 0;  
    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 = 0;  
  
        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   =   0;     
    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=0;  
  
    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=0;  
  
    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=0;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>0)  
    m_procCtrl.SetPos(100*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=0;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 == 0)   
    {  
     ((CListBox *)GetDlgItem(IDC_LIST_STATE))->AddString(_T("加载完毕！"));  
     m_IsInitDone = 1;  
     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=0;  
  
    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 
==============================================================================*/


再分享一下我老师大神的人工智能教程吧。零基础！通俗易懂！风趣幽默！还带黄段子！希望你也加入到我们人工智能的队伍中来！http://www.captainbed.net

猜你喜欢

转载自www.cnblogs.com/sjwudhwhhw/p/10509825.html
今日推荐
TIOBE 5 月榜单：Fortran “复活”进入 Top 10
GCC 14.1 发布
面壁智能发布 Eurux-8x22B 开源大模型 —— 堪称「理科状元」
开源日报 | 谷歌扶持鸿蒙上位；开源Rabbit R1；Docker加持的安卓手机；微软的焦虑和野心；海尔电器把开放平台关了
中国码农的“35岁魔咒”
蘭雅 CorelDRAW 插件 2024.5.1 国际劳动节版，免费下载
Arc Browser for Windows 1.0 正式 GA
90后程序员开发视频搬运软件、不到一年获利超 700 万，结局很刑！
周排行
Java自定义时间格式
同步整形电路
在开发中最最最常用的字符串的属性大集合
Linux 查看端口占用并杀掉
Java基础四：ArrayList
多线程之死锁就是这么简单
mysql 基础命令集
awk 命令详解
Centos6.3编译安装nginx+php步骤
OCR （Optical Character Recognition，光学字符识别）
每日归档
更多
2024-05-08(42)
2024-05-07(14)
2024-05-06(40)
2024-05-05(0)
2024-05-04(7)
2024-05-03(19)
2024-05-02(0)
2024-05-01(4)
2024-04-30(1)
2024-04-29(40)

代码天地 © 2018 codetd.com

境外服务器   最新电视剧2022