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")
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")Encore merci pour l'aide.
Renaud42
- Messages postés
-
15934
- Date d'inscription
- mardi 11 mars 2003
- Statut
- Contributeur
- Dernière intervention
- 15 mai 2021
545