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

Question

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

问题是，有时在服务读取网站时会随机出现一些弹出窗口，我所需要的只是关闭或“接受”此弹出窗口，以便服务可以继续其工作。

希望任何人都可以帮助我。

编辑：我可以禁用脚本错误：

WebBrowser1.ScriptErrorsSuppressed = True

这只是没有显示错误，但并没有解决问题，仍在处理它。

Answer 1

我不认为使用 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))