VC6下CHtmlView中最简单最全面的程序与网页交互方法【转】

最新推荐文章于 2026-06-17 10:40:45 发布

转载最新推荐文章于 2026-06-17 10:40:45 发布 · 1.2k 阅读

mfc 专栏收录该内容

3 篇文章

订阅专栏

本文详细介绍了在VC6环境下如何通过增强ChtmlView功能实现与网页的DOM交互，包括获取DOM元素、调用网页JS函数和方法，以及网页调用VC6方法的协议扩展。重点在于提供简洁、易于使用的代码片段，简化复杂操作。

注：转自 Mr.7的网易博客

写的太实用了，未经允许就转了，不行的话，我可以删除。

VC6下CHtmlView中最简单最全面的程序与网页交互方法

简单来说，终极目标------VC6和网页相互调用对方的数据和方法；而调用方法时重点要捕获返回值。

VC6下远没有VC7及其之后提供的操作丰富方便。一些深度应用的破解方法，钻进应用的原理中，解释起来很繁琐；同时操作起来也非常麻烦。能够达到同样的功能，但是代码越少，使用起来越方便，可能这就是追求目标。通过如下的一些小技巧来达成目标，可以成系列的解决所有问题。

1. VC6获取网页DOM
网页的模型就是DOM。主要就是对ChtmlView的功能进行增强，增强对DOM元素的取设、查询等操作。
说明：要识别IHTMLDocument2，必须 #include “comdef.h”

1.1 获取 document.body-

IHTMLElementPtr CHtmlViewEx::sIE_GetBody() 
{
    IHTMLElementPtr  ipBody;
    IHTMLDocument2Ptr ipDocument = GetHtmlDocument();
    if(ipDocument==NULL)
        return ipBody;
    ipDocument->get_body(&ipBody);
    return ipBody;
}

1.2 实现该功能 document.getElementByID()-

//-js中的这个可以用， 
//-是因为dispinterface DispHTMLDocument 中有getElementByID 该方法- 
//-IHTMLDocument2 中没有而IHTMLDocument3有。 
//-考虑到我们最简单的使用，我们不会引入IHTMLDocument3，而直接实现- 
IHTMLElementPtr CHtmlViewEx::sIE_GetElementByID(LPCTSTR strID) 
{
    IHTMLElementPtr  ipElement;

    IHTMLDocument2Ptr ipDocument = GetHtmlDocument();
    if(ipDocument==NULL)
        return ipElement;
 
    IHTMLElementCollectionPtr ipSet;
    ipDocument->get_all(&ipSet);
    if(ipSet==NULL)
        return ipElement;
 
    IDispatchPtr ipDispatch;
    _variant_t vtIndex;
    _bstr_t  bstrName(strID);
    _variant_t vtName = bstrName;
    ipSet->item(vtName, vtIndex, &ipDispatch);
    ipElement = ipDispatch;
    return ipElement;
}

1.3 获取特定值，其实都是com的方法调用-

IHTMLElementPtr ipBody = sIE_GetBody(); 
_bstr_t  bstrName(L"title"); 
_variant_t vtValue;  
ipBody->getAttribute(bstrName, 0, &vtValue); 
CString  strTitle(vtValue.bstrVal);

2. VC6调用网页JS函数和方法
2.1 获取脚本总的对象

IDispatchPtr CHtmlViewEx::sIE_GetScript() 
{
    IDispatchPtr  ipDispatch; 
    IHTMLDocument2Ptr ipDocument = GetHtmlDocument();
    if(ipDocument==NULL)
        return ipDispatch;
    HRESULT hr = ipDocument->get_Script(&ipDispatch); 
    return ipDispatch;
}

2.2 调用方法，注意方法可能存在参数的先后顺序

// CDispatchObj方法实际上就是对IDispatch的invoke的简单封装 
CDispatchObj obj(ipDispatch.GetInterfacePtr()); 
_variant_t vt(bstrValue); 
obj.Invoke1_S(L"funcA", vt, 0);

3. 网页调用VC6方法：协议扩展
网页脚本中要调用VC6的方法时，都通过扩展协议来实现；然后VC6来解析该协议。

3.1 网页调用协议iitp：

var trm_view = function() //查看 
{   
    var strUrl = "iitp://mydo/view.do";   
    document.location.href = strUrl; 
}

3.2 VC6：截获链接并特殊处理协议iitp
注意*pbCancel = TRUE避免链接进行了跳转

void CHtmlViewEx::OnBeforeNavigate2(LPCTSTR lpszURL, DWORD nFlags,LPCTSTR lpszTargetFrameName, 
    					CByteArray& baPostedData, LPCTSTR lpszHeaders, BOOL* pbCancel) 
{
    CString strUrl = lpszURL;
    CString strProtcl = _T("iitp://mydo/");
    if(strUrl.CompareNoCase(strProtcl)>0 )
    {
       CString strCmd  = _T("iitp://mydo/view.do");
       //查看
       if(strUrl.CompareNoCase(strCmd)==0)
       {
           //--todo my function--
           UpdateWindow();
       }
      //-注意避免跳转页面-
      *pbCancel = TRUE;
    }
    else
    {
       CHtmlView::OnBeforeNavigate2(lpszURL, nFlags, 
       lpszTargetFrameName, baPostedData,lpszHeaders, pbCancel);
    }
}

4. 网页调用VC6的数据和方法：功能扩展

4.1 直接将数据绑定在某一DOM上

_RecordsetPtr ipRst; 
_variant_t vtRst(ipRst, true); 
ipBody->setAttribute(L"rst", vtRst, 0);

以后网页脚本中就可以使用document.body.rst来调用ipRst的各种方法了。

4.2.1 给网页扩展一个IDispatch对象
如果是MFC，则可以直接使用MFC 自动化对象，避免写组件

class CMyHtmlView : public ChtmlView
{
 ……
    //{{AFX_DISPATCH(CMyHtmlView)
    afx_msg BSTR GetVersion();
    afx_msg void SetVersion(LPCTSTR lpszNewValue);
    afx_msg BSTR SayIt(long num);
    //}}AFX_DISPATCH
    DECLARE_DISPATCH_MAP()
};

CMyHtmlView::CMyHtmlView()
{
    EnableAutomation();
}

BEGIN_DISPATCH_MAP(CMyHtmlView, CHtmlView)
    //{{AFX_DISPATCH_MAP(CMyHtmlView)
    DISP_PROPERTY_EX(CMyHtmlView, "version", GetVersion, SetVersion, VT_BSTR)
    DISP_FUNCTION(CMyHtmlView, "SayIt", SayIt, VT_BSTR, VTS_I4)
    //}}AFX_DISPATCH_MAP
END_DISPATCH_MAP()

BSTR CMyHtmlView::SayIt(long num) 
{
    CString strResult;
    strResult.Format("num = %d", num*2);
    return strResult.AllocSysString();
}

void CMyHtmlView::DocumentComplete(LPDISPATCH pDisp, VARIANT* URL)
{
    CHtmlView::DocumentComplete(pDisp, URL);

    IHTMLDocument2Ptr ipDocument = GetHtmlDocument(); 
    if(ipDocument)
    {

        IHTMLElementPtr  ipBody;
        ipDocument->get_body(&ipBody);
        LPDISPATCH pDispatch = GetIDispatch(TRUE);
        HRESULT hr = ipBody->setAttribute(L"external", _variant_t(pDispatch, false), 0);
    }  
}

4.2.2 脚本中就可以调用：

function test()
{
    var rtn = document.body.external.SayIt(6);
    alert(rtn);
}

虽然最通用的方法是使用window.external，但是需要改写。此种方法压根就不需要进行特殊的扩展。

注：转自 Mr.7的网易博客

// CDispatchObj方法实际上就是对IDispatch的invoke的简单封装 
CDispatchObj obj(ipDispatch.GetInterfacePtr()); 
_variant_t vt(bstrValue); 
obj.Invoke1_S(L"funcA", vt, 0);