парсинг json с джроком в vb.net - PullRequest
Новая
       34

парсинг json с джроком в vb.net

2 голосов
/ 08 сентября 2011

Я пытаюсь проанализировать некоторые json, которые я получаю от службы. Например, он возвращает 

      {
  "error" : 
  {
    "code" : 500, 
    "message" : "Error Executing Task. Error executing tool.", 
    "details" : []
  }
}

Все, что мне нужно, это текст в поле сообщения. Используя jayrock, каков простой способ получить данные. У меня есть: 

 Dim request As HttpWebRequest
    Dim response As HttpWebResponse = Nothing
    Dim jarray As Jayrock.Json.JsonObject
request = DirectCast(WebRequest.Create(url), HttpWebRequest)
        response = DirectCast(request.GetResponse(), HttpWebResponse)

        Dim reader As JsonTextReader = New JsonTextReader((New StreamReader(response.GetResponseStream)))


        jarray = Jayrock.Json.Conversion.JsonConvert.Import(reader)

Какой самый эффективный способ получения данных «сообщения»

1 Ответ

2 голосов
/ 09 сентября 2011

Я могу говорить только за себя, но я бы написал так: 

Dim cMessage As String = "{ ""error"" : { ""code"" : 500, " & _
                                """message"" : ""Error Executing Task. " & _
                                "Error executing tool.""," & _
                                """details"" : [] " & _
                                "}" & _
                                "}"

Dim objResponse As JsonObject


objResponse = CType(JsonConvert.Import(cMessage), JsonObject)

MsgBox( "Last response was: " + objResponse("error")("message") )

P.S .: Не забудьте импортировать Jayrock.Json и Jayrock.Json.Conversion

...