0

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

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”

我将如何防止这些错误？

4

1 回答 1

1

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

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

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

如果您使用的 URL 格式不正确，则您无能为力。

于 2010-12-26T15:05:41.733 回答