求教怎么用vb编程解决IE脚本异常!

求教如何用vb编程解决IE脚本错误!!!
我用vb写了个浏览器程序,之中调用了webbrower控件。但在浏览网页时经常出现以下脚本错误:


点击刷新后还会反复出现

求教高手这该如何解决?



------解决方案--------------------
看Microsoft帮助:
http://support.microsoft.com/kb/279535
若要取消默认 Internet Explorer 的错误消息的窗口 onerror 事件,您可以将事件对象的 returnValue 属性设置为 True。
要在 returnValue 属性设置为 True,请执行以下步骤: 
创建一个新的 Visual Basic 标准 EXE 项目。默认情况下创建 Form1。
向 Form1 中添加一个 web 浏览器控件。
添加到 Microsoft HTML 对象的一个项目引用库 (Mshtml.tlb)。
在 Form1 的声明部分中添加以下代码: 
Dim WithEvents objDoc As MSHTML.HTMLDocument
Dim WithEvents objWind As MSHTML.HTMLWindow2
Dim objEvent As CEventObj


WebBrowser1_NavigateComplete 事件中添加以下代码: 
Private Sub WebBrowser1_NavigateComplete()

Set objDoc = WebBrowser1.Document
Set objWind = objDoc.parentWindow

End Sub

将添加事件处理程序的窗口 onerror 事件,如下所示: 
Private Sub objWind_onerror(ByVal description As String, ByVal URL As String, ByVal line As Long)
 
 
Set objEvent = objWind.event
objEvent.returnValue = True
MsgBox (description)
 
 
End Sub

注意此方法将不补漏白编译错误。此外,此方法仅取消该错误消息时关闭脚本调试器在 Internet Explorer 中。设计,如果启用脚本调试程序不是取消该错误。若要关闭脚本调试器在 Internet 浏览器,在 工具 菜单上单击 Internet 选项。在 高级 选项卡上选择 禁用脚本调试 复选框,然后单击 确定。