程序博客网 > 泰拳的杀伤力 知乎

关于MFC项目中使用CDHtmlDialog禁止脚本错误的方法

来源：互联网 发布：泰拳的杀伤力 知乎 编辑：程序博客网 时间：2024/05/16 16:18

当WebBrowser控件(CDHtmlDialog自动创建了WebBrowser控件)加载的网页中含有错误Javascript代码时默认情况下控件会弹出错误信息提示对话框，相对于用户体验来说这样的提示完全不是开发人员想要的，针对这个问题有两个解决方案，一是完全屏蔽掉错误提示，二是控制错误的提示并且记录错误信息同时也可以控制出现错误后Javascript是否继续执行。

1、屏蔽错误信息提示

 

?
view plain
  1. m_pBrowserApp->put_Silent(VARIANT_TRUE);//禁止脚本错误提示  

在CDHtmlDialog::OnInitDialog()的代码中首先了创建WebBrowser控件，然后把控件的Browser对象赋值给m_pBrowserApp（这是CDHtmlDialog完成的不需要自己处理）。WebBrowser的put_Silent函数在官方给出的说明是禁用所有的对话框，但例外情况是它不会影响SSL安全认证需要的进示对话框。绝大多数情况下这就可以解决问题了，记得很久以前我遇到过一种情况就是虽然调用了put_Silent但是还是有极个别的js错误是无法屏蔽掉的依然会显示出来(在网页含有嵌套页面时会错误无法屏蔽，不知道是否还有其它情况)，现在找不到这样的网页了，如果谁遇到这种情况了建议给我发上个URL让我也重温一下当年阳光灿烂的时刻。

2、控制错误提示并进行记录

　　这要比第一种方法复杂上许多，简短的来说就是自定义COleControlSite类并实现IOleCommandTarget接口，IOleCommandTarget接口是错误控制的关健，错误发生时会触发此接口的Exec函数并为nCmdID参数赋值为OLECMDID_SHOWSCRIPTERROR,这样就可以得到错误信息了。

 

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
IOleCommandTarget : publicIUnknown
    {
    public:
        virtual/* [input_sync] */ HRESULT STDMETHODCALLTYPE QueryStatus(
            /* [unique][in] */ __RPC__in_opt constGUID *pguidCmdGroup,
            /* [in] */ ULONG cCmds,
            /* [out][in][size_is] */ __RPC__inout_ecount_full(cCmds) OLECMD prgCmds[  ],
            /* [unique][out][in] */ __RPC__inout_opt OLECMDTEXT *pCmdText) = 0;
         
        virtualHRESULT STDMETHODCALLTYPE Exec(
            /* [unique][in] */ __RPC__in_opt constGUID *pguidCmdGroup,
            /* [in] */ DWORD nCmdID,
            /* [in] */ DWORD nCmdexecopt,
            /* [unique][in] */ __RPC__in_opt VARIANT *pvaIn,
            /* [unique][out][in] */ __RPC__inout_opt VARIANT *pvaOut) = 0;
         
    };
    

现在我们开始实现自定义的COleControlSite，代码如下：

view plain
  1. CMyControlSite.h  
view plain
  1. #pragma once  
  2. #include "afxocc.h"  
  3. #include "Mshtml.h"//应该加入这个头文件  
  4. #include "Mshtmhst.h"//这个也是  
  5. class CMyControlSite :public COleControlSite  
  6. {  
  7. public:  
  8.     CMyControlSite(COleControlContainer *pCntr):COleControlSite(pCntr) {}  
  9.     ~CMyControlSite(void);  
  10. protected:  
  11.     DECLARE_INTERFACE_MAP()    
  12.     BEGIN_INTERFACE_PART(OleCommandTarget, IOleCommandTarget)    
  13.         STDMETHOD(QueryStatus)(const GUID *pguidCmdGroup, ULONG cCmds, OLECMD prgCmds[], OLECMDTEXT *pCmdText);    
  14.         STDMETHOD(Exec)(const GUID* pguidCmdGroup, DWORD nCmdID, DWORD nCmdexecopt, VARIANTARG* pvaIn, VARIANTARG* pvaOut);    
  15.     END_INTERFACE_PART(OleCommandTarget)    
  16. };  
  1. CMyControlSite.cpp  
view plain
  1. #include "StdAfx.h"  
  2. #include "MyControlSite.h"  
  3.   
  4.   
  5. BEGIN_INTERFACE_MAP(CMyControlSite, COleControlSite)    
  6.     INTERFACE_PART(CMyControlSite, IID_IOleCommandTarget, OleCommandTarget)  
  7. END_INTERFACE_MAP()    
  8.   
  9.   
  10.   
  11. CMyControlSite::~CMyControlSite(void)  
  12. {  
  13. }  
  14.   
  15. HRESULT CMyControlSite::XOleCommandTarget::Exec    
  16. (const GUID* pguidCmdGroup, DWORD nCmdID,    
  17.  DWORD nCmdexecopt, VARIANTARG* pvaIn, VARIANTARG* pvaOut )    
  18. {    
  19.     HRESULT hr = OLECMDERR_E_NOTSUPPORTED;    
  20.     //return S_OK;    
  21.     if (pguidCmdGroup && IsEqualGUID(*pguidCmdGroup, CGID_DocHostCommandHandler))    
  22.     {    
  23.   
  24.         switch (nCmdID)     
  25.         {    
  26.   
  27.         case OLECMDID_SHOWSCRIPTERROR:    
  28.             {    
  29.                 IHTMLDocument2*             pDoc = NULL;    
  30.                 IHTMLWindow2*               pWindow = NULL;    
  31.                 IHTMLEventObj*              pEventObj = NULL;    
  32.                 BSTR                        rgwszNames[5] =     
  33.                 {     
  34.                     SysAllocString(L"errLine"),    
  35.                     SysAllocString(L"errCharacter"),    
  36.                     SysAllocString(L"errCode"),    
  37.                     SysAllocString(L"errMsg"),    
  38.                     SysAllocString(L"errUrl")    
  39.                 };    
  40.                 DISPID                      rgDispIDs[5];    
  41.                 VARIANT                     rgvaEventInfo[5];    
  42.                 DISPPARAMS                  params;    
  43.                 BOOL                        fContinueRunningScripts = false;  //修改此处为false禁止脚本错误提示  
  44.   
  45.                 params.cArgs = 0;    
  46.                 params.cNamedArgs = 0;    
  47.                   
  48.                 hr = pvaIn->punkVal->QueryInterface(IID_IHTMLDocument2, (void **) &pDoc);        
  49.                    
  50.                 hr = pDoc->get_parentWindow(&pWindow);    
  51.                 pDoc->Release();    
  52.                   
  53.                 hr = pWindow->get_event(&pEventObj);    
  54.                   
  55.                 for (int i = 0; i < 5; i++)     
  56.                 {      
  57.                       
  58.                     hr = pEventObj->GetIDsOfNames(IID_NULL, &rgwszNames[i], 1,     
  59.                         LOCALE_SYSTEM_DEFAULT, &rgDispIDs[i]);    
  60.                   
  61.                     hr = pEventObj->Invoke(rgDispIDs[i], IID_NULL,    
  62.                         LOCALE_SYSTEM_DEFAULT,    
  63.                         DISPATCH_PROPERTYGET, &params, &rgvaEventInfo[i],    
  64.                         NULL, NULL);    
  65.                     //可以在此记录错误信息                    //必须使用SysFreeString来释放SysAllocString分配的内存,SysAllocString在分配的内存中记录了字符的长度  
  66.                     SysFreeString(rgwszNames[i]);    
  67.                 }    
  68.   
  69.                 // At this point, you would normally alert the user with     
  70.                 // the information about the error, which is now contained    
  71.                 // in rgvaEventInfo[]. Or, you could just exit silently.    
  72.   
  73.                 (*pvaOut).vt = VT_BOOL;    
  74.                 if (fContinueRunningScripts)    
  75.                 {    
  76.                     // 在页面中继续执行脚本   
  77.                     (*pvaOut).boolVal = VARIANT_TRUE;    
  78.                 }    
  79.                 else   
  80.                 {    
  81.                     // 停止在页面中执行脚本    
  82.                     (*pvaOut).boolVal = VARIANT_FALSE;       
  83.                 }     
  84.                 break;    
  85.             }    
  86.         default:    
  87.             hr =OLECMDERR_E_NOTSUPPORTED;   
  88.             break;    
  89.         }    
  90.     }    
  91.     else   
  92.     {    
  93.         hr = OLECMDERR_E_UNKNOWNGROUP;  
  94.     }    
  95.     return (hr);    
  96. }    
  97.   
  98.   
  99. ULONG FAR EXPORT CMyControlSite::XOleCommandTarget::AddRef()     
  100. {     
  101.     METHOD_PROLOGUE(CMyControlSite, OleCommandTarget)     
  102.         return pThis->ExternalAddRef();     
  103. }     
  104.   
  105.   
  106. ULONG FAR EXPORT CMyControlSite::XOleCommandTarget::Release()     
  107. {     
  108.     METHOD_PROLOGUE(CMyControlSite, OleCommandTarget)     
  109.         return pThis->ExternalRelease();     
  110. }     
  111.   
  112. HRESULT FAR EXPORT CMyControlSite::XOleCommandTarget::QueryInterface(REFIID riid, void **ppvObj)     
  113. {     
  114.     METHOD_PROLOGUE(CMyControlSite, OleCommandTarget)     
  115.         HRESULT hr = (HRESULT)pThis->ExternalQueryInterface(&riid, ppvObj);     
  116.     return hr;     
  117. }    
  118.   
  119. STDMETHODIMP CMyControlSite::XOleCommandTarget::QueryStatus(     
  120.     /* [unique][in] */ const GUID __RPC_FAR *pguidCmdGroup,     
  121.     /* [in] */ ULONG cCmds,     
  122.     /* [out][in][size_is] */ OLECMD __RPC_FAR prgCmds[ ],     
  123.     /* [unique][out][in] */ OLECMDTEXT __RPC_FAR *pCmdText     
  124.     )     
  125. {     
  126.     METHOD_PROLOGUE(CMyControlSite, OleCommandTarget)     
  127.         return OLECMDERR_E_NOTSUPPORTED;     
  128. }     


对话框头文件加入声明：

view plain
  1. virtual BOOL CreateControlSite(COleControlContainer* pContainer,   
  2.         COleControlSite** ppSite, UINT  nID , REFCLSID  clsid );  

 

对应源文件：

view plain
  1. BOOL CXDlg::CreateControlSite(COleControlContainer* pContainer,   
  2.         COleControlSite** ppSite, UINT  nID , REFCLSID  clsid )  
  3. {  
  4.         if(ppSite == NULL)  
  5.     {  
  6.         ASSERT(FALSE);  
  7.         return FALSE;  
  8.     }  
  9.   
  10.     CMyControlSite *pBrowserSite =   
  11.         new CMyControlSite (pContainer);//  
  12.     if (!pBrowserSite)  
  13.         return FALSE;  
  14.   
  15.     *ppSite = pBrowserSite;  
  16.     return TRUE;  
  17. }  

hinkingfor原文中为CDHtmlDialog，同样适用于CDialog.

参考文章  CDHtmlDialog探索----WebBrowser扩展和网页Javascript错误处理 作者：thinkingfor

http://blog.csdn.net/cnfixit/article/details/6780583

泰拳的杀伤力 知乎 泰拳的杀伤力 知乎
原创粉丝点击
热门IT博客
淘宝试用报告提交晚了淘宝试用报告提交晚了
win7桌面数字时钟软件win7桌面数字时钟软件
n8设计软件v6
centos7和ubuntu
淘宝图片大小多少合适
香港4g网络制式频段
文小刚 知乎
mac os sierra 正式版
怎么看linux版本
知乎个人主页图片
手机上怎么改淘宝评论
c语言入门视频百度云
python 画图 线条粗细
淘宝衣服店名字大全
模糊控制算法的优缺点
阿里云 微信公众号
ubuntu 英文输入法
琉璃神社 域名 2016
资生堂男士洗面奶知乎
淘宝客服忙不忙
热门问题 老师的惩罚 人脸识别 我在镇武司摸鱼那些年 重生之率土为王 我在大康的咸鱼生活 盘龙之生命进化 天生仙种 凡人之先天五行 春回大明朝 姑娘不必设防，我是瞎子 乍得沙赫人 寒冬乍暖你还在 春光乍现 寒冬乍暖 情乍起莫不言欢喜 春光乍 沪乍杭铁路 一惊一乍 春光乍泻 乍见之欢什么意思 乍的意思 风乍起 乍的拼音 银瓶乍破水浆迸 乍毛变色 久处不厌乍见之欢原文 乍浦吧 灵光乍现 春光乍泻剧情 乍拼音 久梦乍回 baby亮相釜山乍 南初陆骁寒冬乍暖你还在 电子版驾驶证乍么弄 新生儿睡觉一惊一乍双手举起 宝宝睡觉一惊一乍双手举起 乍加偏旁组成新字 酉乍是什么字 去非洲乍得工作危险吗 乍得首都 寒冬乍暖你还在全文免费阅读 乍浦楼盘 乍浦房产为什么不能买 乍浦急售二手房 平湖乍浦开心宾馆预订 乍浦二手房 平湖乍浦开心宾馆 乍浦九龙山住宿 乍浦在线 乍浦在哪里 乍浦房产网

程序博客网，程序员的互联网技术博客家园。csdn论坛精品 msdn技术资料都在这里