Après plusieurs recherches et plusieurs tests, je n'ai toujours pas trouvé la façon pour sortir une valeur d'un JSON sans aucune librairie. Tout ce que j'ai testé était soit pas fonctionnel, soit instable.
Je pense que ça doit tourner autour de la classe
Web.Script.Serialization.JavaScriptSerializer
mais je n'ai toujours pas trouvé le moyen de le faire.
Si quelqu'un sait comment faire, merci de me répondre.
Merci beaucoup.
Comme je pense que ça peut aider voici le code que j'ai conclu :
Il faut déjà ajouter la référence System.Web.Extensions et ensuite le code :
Dim jsonAParser As String = "{""status"":{""online"":true,""status"":""running""}}"
Dim jss As New Web.Script.Serialization.JavaScriptSerializer
Dim response As Object
response = jss.DeserializeObject(jsonAParser)
' Obtenir "status/online"
response("status")("online")
' Obtenir "status/status"
response("status")("status")
6 mai 2018 à 13:25
Comme je pense que ça peut aider voici le code que j'ai conclu :
Il faut déjà ajouter la référence System.Web.Extensions et ensuite le code :
Encore merci pour l'aide.
Renaud42
6 mai 2018 à 13:28