0

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

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

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

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

WebBrowser1.ScriptErrorsSuppressed = True

这只是没有显示错误,但没有解决问题,仍在解决问题。

4

1 回答 1

2

我不认为使用网络浏览器控件是最好的方法。如果您正在阅读网页,那么您可以使用以下代码来阅读 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))
于 2012-06-29T11:59:28.130 回答