WebBrowser控件Window.Error中的JS Script错误

时间:2015-08-31 21:29:54

标签: .net vb.net winforms

我在VS 2012中使用Visual Basic。这是我正在尝试设置的类的pastebin。 PasteBin 我在这里跟随MSDN。 MSDN

有问题的代码的主要部分是:

    Dim SenderBrowser As WebCommander = CType(sender, WebCommander)

    If SenderBrowser.Document IsNot Nothing AndAlso SenderBrowser.Document.Window IsNot Nothing Then
        AddHandler SenderBrowser.Document.Window.Error, AddressOf WebCommander_SuppressErrorDialogs

        If SenderBrowser.Document.Window.Frames.Count > 0 Then

            For Each FrameSource As HtmlWindow In SenderBrowser.Document.Window.Frames
                AddHandler FrameSource.Document.Window.Error, AddressOf WebCommander_SuppressErrorDialogs
            Next

        End If
    End If

和这个

Private Sub WebCommander_SuppressErrorDialogs(ByVal sender As Object, ByVal e As HtmlElementErrorEventArgs)
    e.Handled = True
End Sub

如果我把这个

放在SuppressErrorDialogs Sub中
    MsgBox(e.Url.ToString & " " & e.Handled.ToString)

然后我得到一个带有URL和True的消息框,但我仍然得到脚本错误,说明是或否以允许脚本继续运行。有什么我做错了吗?

我尝试了几种组合但没有成功。而且要注意,我不能简单地将SenderBrowser.SuppressScriptErrors设置为True,因为我仍然需要SSL和登录窗口。我正在测试警报是否出现的方式是使用onclick="brokefun();"不存在的JS函数,但警报也会以其他方式出现。我无法控制服务器代码。

0 个答案:

没有答案