在 VB.Net 中执行 Webrequest 时防止错误

Question

我使用以下函数收到三个错误：

Private Sub readWebpage(ByVal url As String)
    Try
        Dim req As System.Net.WebRequest = System.Net.WebRequest.Create(url)
        Dim resp As System.Net.WebResponse = req.GetResponse
        If Not resp.ContentType.Contains("text/html") And Not resp.ContentType.Contains("application/xhtml+xml") Then Exit Sub
        Using Str As System.IO.Stream = resp.GetResponseStream
            Using srRead As System.IO.StreamReader = New System.IO.StreamReader(Str)
                parseHtml(srRead.ReadToEnd, url)
            End Using
        End Using
    Catch ex As Exception
        Debug.Print(ex.Message)
        Debug.Print(url)
        MsgBox(ex.Message, MsgBoxStyle.Critical, "Unable to download content from: " & url)
    End Try
End Sub

远程服务器返回错误： (500) 内部服务器错误。

服务器提交了一个协议 违反。 Section=ResponseStatusLine

无法解析远程名称： 'dmoz.orgsearch'

如何防止这些错误发生？

Answer 1

您无法防止远程错误。你能做到的最好的事情就是按照你现在的方式捕获异常。

不过，我建议您使用的网址不正确 - dmoz.orgsearch 不存在。

这应该是：http://www.dmoz.org/search?q=myquery？

如果您使用的网址格式不正确，您将无能为力。