从vb.net关闭脚本弹出窗口

时间:2012-06-29 10:19:17

标签: javascript html vb.net javascript-events vb.net-2010

我正在vb.net中开发一个win32应用程序,需要使用“WebBrowser”控件从某些网站读取信息。

问题在于,当服务正在阅读网站时,有时会随机出现一些弹出窗口,我只需关闭或“接受”此弹出窗口,以便服务可以继续他的工作。

希望有人能帮助我,谢谢。

编辑:已解决,只是禁用了脚本错误:

WebBrowser1.ScriptErrorsSuppressed = True

这只是没有显示错误,但是没有解决它,仍然在处理它。

1 个答案:

答案 0 :(得分:2)

我不认为使用webbrowser控件是最好的方法。如果您正在阅读网页,那么您可以使用以下代码来阅读html,然后自己解析(这将避免任何弹出窗口)

Public Shared Function GetPageAsString(ByVal address As Uri) As String
    Dim request As HttpWebRequest
    Try
        request = DirectCast(WebRequest.Create(address), HttpWebRequest)
        Using response As HttpWebResponse = DirectCast(request.GetResponse(), HttpWebResponse)
            Using reader As StreamReader = New StreamReader(response.GetResponseStream())
                Return reader.ReadToEnd
            End Using
        End Using
    Catch ex As Exception
        MessageBox.Show(ex.Message)
        Return ""
    End Try
End Function

用法:

Dim url as string = "http://www.bbc.co.uk"
Dim webContent As String = GetPageAsString(New Uri(url))