在CDHTMLDialog中扩展浏览器脚本以及在HTML中增加MFC消息响应

扩展浏览器脚本

假设我们创建了一个CMyDHTMLDialog对话框类，包含两个文件MyDHTMLDialog.h和MyDHTMLDialog.cpp
1、让类自身支持自动化
EnableAutomation(); //只要是从CCmdTarget派生下来的类都可以支持
//可以放在CMyDHTMLDialog::CMyDHTMLDialog()中调用

2、将自身暴露给Script引擎
SetExternalDispatch(GetIDispatch(TRUE)); //将浏览器控件的扩展接口设置为对话框自身的IDispatch
//放在CMyDHTMLDialog::OnInitDialog中调用

3、声明DISPATCH_MAP
DECLARE_DISPATCH_MAP() //MyDHTMLDialog.h的类声明中

5.定义一个方法 //MyDHTMLDialog.h的类声明中

afx_msg void Func1();

6、编写具体的方法
BEGIN_DISPATCH_MAP(CMyDHtmlDialog, CDHtmlDialog)
DISP_FUNCTION(CMyDHTMLDialog, "Func1", Func1, VT_EMPTY, VTS_NONE) //每个方法都需要在这里添加映射
END_DISPATCH_MAP()

void CMyDHTMLDialog::Func1()
{
MessageBox(_T("Hello!"));
}

7.重载CanAccessExternal

virtual BOOL CanAccessExternal();////在MyDHTMLDialog.h文件中

BOOL CWebUIAppDlg::CanAccessExternal() //在MyDHTMLDialog.cpp文件中
{
return TRUE;
}

8、测试
修改资源中的MyDHTMLDialog.htm文件
添加一个按钮，

<INPUT id="Button1" type="button" value="Button1" name="Button1" onclick="external.Func1();">

注意：所有暴露出去的方法都是在external.中提供，而这个external就是对话框自己，就是SetExternalDispatch中所传递的参数。

总结：上面所做的所有工作，无非就是将一个IDispatch接口指针传递给浏览器，浏览器中的脚本引擎就可以通过external这个对象句柄来访问我们自定义的方法。

备注：重载CanAccessExternal，返回true，即可消除“在此页上的Activex控件和本页上的其它部分的交互可能不安全，您想允许交互吗？”警告

HTML中增加MFC消息响应

1.Web中增加一标签
<a ID="LinkSubmit">提交</a>

2.申明消息处理函数
HRESULT OnLinkSubmit(IHTMLElement *pElement);

3.消息映射
BEGIN_DHTML_EVENT_MAP(CWebUIAppDlg)
DHTML_EVENT_ONCLICK(_T("LinkSubmit"), OnLinkSubmit)
END_DHTML_EVENT_MAP()

4.函数实现
HRESULT CWebUIAppDlg::OnLinkSubmit(IHTMLElement* pElement)
{
AfxMessageBox(L"OnLinkSubmit");
return S_OK;
}

4、定义DISPATCH映射
BEGIN_DISPATCH_MAP(CMyDHtmlDialog, CDHtmlDialog) //在MyDHTMLDialog.cpp文件中
END_DISPATCH_MAP()