Visual Basic Десериализация JSON URL - PullRequest
1 голос
/ 07 марта 2019

я пытаюсь получить imdb id через идентификатор фильма, используя visual basic с помощью json deserialize

dim rawresp as string = read.readtoend() rawresp = textbox3.text

работает нормально, но я не хочу, чтобы весь json записывал в текстовое поле, я хочу, чтобы только imdb_id записывал в мой textbox3.text

Допустим, вот ссылка JSON -> https://api.themoviedb.org/3/movie/550?api_key=315b4646c080bc576529769498ccc658

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 dict As Object = New JavaScriptSerializer().Deserialize(Of List(Of Object))(rawresp)
    For Each item As Object In dict
        TextBox3.Text = item("imdb_id").ToString()
    Next
End Sub

1 Ответ

0 голосов
/ 07 марта 2019

Попробуйте, надеюсь, это поможет

Dim jsonResulttodict = JsonConvert.DeserializeObject(Of Dictionary(Of String, Object))(rawresp)
Dim imdb_ID = jsonResulttodict.item ("imdb_id") 
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...