用过的baidu空间,太难用了,还是cnblogs好用
GZ.Jackey
学无止境,博采众长。

WebBrowserCHtmlView中轻松屏蔽脚本错误(JavaScript)

 

1.什么是javascript脚本错误

1.1    概述

JavaScript脚本错误包含“运行时错误”和“语法错误”。

1.2    JavaScript“语法错误”

JavaScript语法错误是指当 JavaScript语句违反了 JavaScript脚本语言的一条或多条语法规则时导致的错误。JavaScript语法错误发生在程序编译阶段,在开始运行该程序之前。

1.3    JavaScript“运行时错误”

JavaScript运行时错误是指当 JavaScript脚本试图执行一个系统不能运行的动作时导致的错误。当正在运行脚本、计算变量表达式、或者正在动态分配内存时出现 JavaScript运行时错误时。

2.    为什么要屏蔽javascript脚本错误?

由于开发海纳产品时,使用WebBrowserCHtmlView来展示页面,进行填表等操作;但是由于打开的页面大多是其他用户的CMS页面,所以难免有些有脚本错误,于是决定要来屏蔽脚本错误,提升产品的易用性和友好性。

3.    怎么去屏蔽javascript脚本错误?

3.1    使用SetSilent函数

使用WebBrowserCHtmlViewSetSilent函数可以达到屏蔽脚本错误的目的,不过这种情况,其它提示信息也都不显示了,例如使用alert进行的错误提示。

如果你觉得这样能满足你,那么推荐使用这种方法,简单啊!

3.2    重载IOleCommandTargetExec函数

网上比较多资料都是说重载IOleCommandTarget中的Exec函数来进行屏蔽脚本错,定义如下:

HRESULT  Exec( const GUID* pguidCmdGroup, DWORD nCmdID,

      DWORD nCmdexecopt, VARIANTARG* pvaIn, VARIANTARG* pvaOut )

 然后通过判断nCmdID是否等于OLECMDID_SHOWSCRIPTERROR(即报javascript脚本错误)来进行屏蔽;由于本人对COMOLE的知识有限,琢磨了半天也没有想到怎么实现IOleCommandTarget接口中的Exec函数,然后跟我的WebBrowser或是HtmlView挂钩起来,于是决定放弃这种方法,有兴趣的朋友可以查看参考资料的文章继续尝试一下。

3.3    另一种方法

不死心,继续在网上找,突然发现了一篇文章,介绍在html页面中,可以使用javascript的事件来进行javascript脚本错误的屏蔽,于是拷贝下来尝试,果然有用(即使IE浏览器设置了脚本调试,也不会进行提示),经改造的代码如下:


 1<html>
 2<head>
 3<script type="text/javascript" >
 4
 5function fnObjNotDefine(){
 6    domethod();
 7}

 8
 9function fnOnError(msg,url,lineno){
10    <!--
11    alert("window.onerror\n\n" +
12    "Error: " + msg + "\n" +
13    "URL:  " + url + "\n" +
14    "Line:  " + lineno);
15    return true; -->
16}

17window.onerror = fnOnError;
18MethodName.badcommand();
19
20function fnOnLoad(){
21    alert("on load!");
22}

23
</script>
24</head>
25<body onload="fnOnLoad();">
26<input type="button" value="function not defined" onclick="badcommand();">
27<input type="button" value="object not defined" onclick="fnObjNotDefine();">
28</body>
29</html>
30

 

通过查看javascript代码,发现是“重载window.onerror这个事件,只要它返回true,脚本错误就不显示了,估计这个就是Microsoft自己实现的截取javascript脚本错误信息的接口,于是就想怎么把它插入到页面当中,其中有篇文章介绍说在OnDocumentComplete时来实现javascript的插入,经实践,这种方法是不行的;经过本人的不断尝试,发现在OnNavigateComplete2OnNavigateComplete里实现javascript的注入是可行的,这两个函数只要实现一个就行,就看你用的是Navigate2还是Navigate来打开页面了。这里使用Navigate2来做例子,具体代码如下:

 

 1void CMyWebBrowser::OnNavigateComplete2(LPCTSTR strURL)
 2
 3{
 4
 5       CComPtr<IDispatch>   spDisp   =   GetHtmlDocument(); 
 6
 7       if(spDisp   !=   NULL) 
 8
 9       
10
11              CComPtr<IHTMLDocument2> doc;
12
13              spDisp->QueryInterface(IID_IHTMLDocument2, reinterpret_cast<void**>(&doc));
14
15              if(doc != NULL)
16
17              {   
18
19                     IHTMLWindow2 * pIhtmlwindow2 = NULL;
20
21                     doc->get_parentWindow(&pIhtmlwindow2);
22
23                     if(pIhtmlwindow2 != NULL)
24
25                     {
26
27                            //屏蔽javascript脚本错误的javascript脚本
28
29                            CString strJavaScriptCode = "function fnOnError(msg,url,lineno){alert('script error:\\n\\nURL:'+url+'\\n\\nMSG:'+msg +'\\n\\nLine:'+lineno);return true;}window.onerror=fnOnError;";
30
31                            BSTR bstrScript = strJavaScriptCode.AllocSysString();
32
33                            CString strLanguage("JavaScript");
34
35                            BSTR bstrLanguage = strLanguage.AllocSysString();
36
37                            long lTime = 1 * 1000;
38
39                            long lTimeID = 0;
40
41                            VARIANT varLanguage;
42
43                            varLanguage.vt = VT_BSTR;
44
45                            varLanguage.bstrVal = bstrLanguage;
46
47                            VARIANT pRet;
48
49                            //把window.onerror函数插入入当前页面中去
50
51                            pIhtmlwindow2->execScript(bstrScript, bstrLanguage, &pRet);
52
53                            ::SysFreeString(bstrScript);
54
55                            ::SysFreeString(bstrLanguage);
56
57 
58
59                            pIhtmlwindow2->Release();
60
61                     }

62
63              }

64
65       }

66
67}

其中,CMyWebBrowser是我自己继承了CHtmlView类的一个实现类, 这个函数可以在你的WebBrowser2或继承了CHtmlView类中实现,编写一个带有脚本错误的页面,打开进行浏览,是不是发现脚本错误被屏蔽了? 哈哈,实现起来也不麻烦。于是就把这个方法贴出来,供大家参考

另: 经测试,发现如果存在iframe嵌套的时候,嵌套的iframe中包含脚本错误,以上方法是不能屏蔽iframe中的脚本错误的,因为window.onerror只针对当前页面有效,因此需要在OnNavigateComplete2函数里加上对当前页面进行递归所有子页面,然后重复执行execScript操作即可。

最终代码为:


  1void CMyWebBrowser::OnNavigateComplete2(LPCTSTR strURL)
  2
  3{
  4
  5       CComPtr<IDispatch>   spDisp   =   GetHtmlDocument(); 
  6
  7       if(spDisp   !=   NULL) 
  8
  9       
 10
 11              CComPtr<IHTMLDocument2> doc;
 12
 13              spDisp->QueryInterface(IID_IHTMLDocument2, reinterpret_cast<void**>(&doc));
 14
 15              if(doc != NULL)
 16
 17              {   
 18
 19                     CScriptErrHandler scriptHandler;
 20
 21                     scriptHandler.ShieldCurrPage(doc);
 22
 23                     scriptHandler.ShieldAllChildPages(doc);
 24
 25              }

 26
 27       }

 28
 29}

 30
 31ScriptErrHandler.cpp文件:
 32
 33#include "StdAfx.h"
 34
 35#include "ScriptErrHandler.h"
 36
 37CScriptErrHandler::CScriptErrHandler(void)
 38
 39{
 40
 41       CString strJavaScriptCode = "function fnOnError(msg,url,lineno){alert('script error:\\n\\nURL:'+url"
 42
 43              "+'\\n\\nMSG:'+msg +'\\n\\nLine:'+lineno+'\\n\\nframes:' + window.frames.length);return true;}window.onerror=fnOnError;";
 44
 45 
 46
 47       //屏蔽的脚本,可以改进为从文本里读取
 48
 49       m_bstrScript = strJavaScriptCode.AllocSysString();
 50
 51}

 52
 53 
 54
 55CScriptErrHandler::~CScriptErrHandler(void)
 56
 57{
 58
 59       SysFreeString(m_bstrScript);
 60
 61}

 62
 63 
 64
 65 
 66
 67void CScriptErrHandler::ShieldCurrPage(CComPtr<IHTMLDocument2> &doc)
 68
 69{
 70
 71       CComPtr<IHTMLWindow2>  spIhtmlwindow2;
 72
 73       doc->get_parentWindow(reinterpret_cast<IHTMLWindow2**>(&spIhtmlwindow2));
 74
 75       if(spIhtmlwindow2 != NULL)
 76
 77       {
 78
 79              CString strLanguage("JavaScript");
 80
 81              BSTR bstrLanguage = strLanguage.AllocSysString();
 82
 83              long lTime = 1 * 1000;
 84
 85              long lTimeID = 0;
 86
 87              VARIANT varLanguage;
 88
 89              varLanguage.vt = VT_BSTR;
 90
 91              varLanguage.bstrVal = bstrLanguage;
 92
 93              VARIANT pRet;
 94
 95              //把window.onerror函数插入入当前页面中去
 96
 97              spIhtmlwindow2->execScript(m_bstrScript, bstrLanguage, &pRet);
 98
 99              ::SysFreeString(bstrLanguage);
100
101       }

102
103}

104
105 
106
107void CScriptErrHandler::ShieldAllChildPages(CComPtr<IHTMLDocument2> &parentDoc)
108
109{
110
111       WalkAllChildPages(parentDoc);
112
113}

114
115 
116
117void CScriptErrHandler::WalkAllChildPages(CComPtr<IHTMLDocument2> &parentDoc)
118
119{
120
121       CComPtr<IHTMLFramesCollection2> spFramesCol;
122
123       HRESULT hr = parentDoc->get_frames(&spFramesCol);
124
125       if(SUCCEEDED(hr) && spFramesCol != NULL)
126
127       {
128
129              long lSize = 0;
130
131              hr = spFramesCol->get_length(&lSize);
132
133              if (SUCCEEDED(hr))
134
135              {
136
137                     for(int i=0; i<lSize; i++)
138
139                     {
140
141                            VARIANT frameRequested;
142
143                            VARIANT frameOut;
144
145                            frameRequested.vt = VT_UI4;
146
147                            frameRequested.lVal = i;
148
149                            hr = spFramesCol->item(&frameRequested, &frameOut);
150
151                            if(SUCCEEDED(hr) && frameOut.pdispVal != NULL)
152
153                            {
154
155                                   CComPtr<IHTMLWindow2> spChildWindow;
156
157                                  
158
159                                   hr = frameOut.pdispVal->QueryInterface(IID_IHTMLWindow2,reinterpret_cast<void**>(&spChildWindow));
160
161                                   if(SUCCEEDED(hr) && spChildWindow != NULL)
162
163                                   {
164
165                                          CComPtr<IHTMLDocument2> spChildDocument;
166
167                                          hr = spChildWindow->get_document(reinterpret_cast<IHTMLDocument2**>(&spChildDocument));
168
169                                          if(SUCCEEDED(hr) && spChildDocument != NULL)
170
171                                          {
172
173                                                 ShieldCurrPage(spChildDocument);
174
175                                                 WalkAllChildPages(spChildDocument);
176
177                                          }

178
179                                   }

180
181                                   frameOut.pdispVal->Release();
182
183                            }

184
185                     }

186
187              }

188
189       }

190
191}

 

目前存在的一个缺陷是OnNavigateComplete2会被调用多次,那么嵌入javascript的操作也会被执行多次(不知道会产生什么副作用,目前尚未发现)CMyWebBrowserCHtmlView类继承,代码在VC2008VC6.0下调试通过;若需要工程代码,请发送邮件到zhangqingping@hylanda.com

4.    参考资料

4.1   How to handle script errors as a WebBrowser control host

http://support.microsoft.com/default.aspx?scid=kb;en-us;261003

4.2   Script error notification is not sent to Exec method of WebBrowser Host

http://support.microsoft.com/kb/317024/en-us#top

4.3   How to Trap JScript Errors in Internet Explorer 4.01 and Earlier

http://support.microsoft.com/kb/183616/en-us

posted on 2009-06-16 13:32  GZ.Jackey  阅读(8083)  评论(3编辑  收藏