首页 > 解决方案 > 使用循环的 Visual Basic Httpwebresponse 错误 404

问题描述

我在我的 httpwebresponse 中收到错误 404 我正在做的是我每次输入一个新的 url 时都使用循环从 url 的 json 中提取数据,

所以我的循环就像这个 textbox6.text 每次它确实给出 +1 值假设我从 550 开始它继续为 551 552 553 等如果我到达一个带有 url 的数字而没有响应程序确实给出 440 错误(崩溃) 我想发表这样的声明

Dim response As HttpWebResponse = request.GetResponse()

使其成为 IF 语句,如果网站没有响应,它应该执行 textbox6.text = textbox6.text +1 否则它什么也不做

    Private Sub Button12_Click(sender As Object, e As EventArgs) Handles Button12.Click
    Dim uristring As String = ("https://api.themoviedb.org/3/movie/" + TextBox6.Text + "?api_key=315b4646c080bc576529769498ccc658")
    Dim uri As New Uri(uristring)
    Dim request As HttpWebRequest = HttpWebRequest.Create(uri)
    request.Method = "get"
    Dim response As HttpWebResponse = request.GetResponse()
    Dim read = New StreamReader(response.GetResponseStream)
    Dim rawresp As String = read.ReadToEnd()
    Dim jsonResulttodict = JsonConvert.DeserializeObject(Of Dictionary(Of String, Object))(rawresp)
    Dim imdb_ID = jsonResulttodict.Item("imdb_id")
    TextBox3.Text = imdb_ID
End Sub

标签: vb.netloopsif-statementhttpwebresponse

解决方案


推荐阅读