ParseJSON

International Français
1

Bjr, j ai quelques probles avec le JSON
“ParseJSON” ne retourne une erreur

avez vous une idée
Merci

Var dic As New Dictionary
Var json_in As String
Var json_out As String
Var List() As Variant
Var tx As String

dic.Value ( “Date” ) = “aujourdHui”
dic.Value ( “temps” ) = “fait_beau”
List.Add ( dic )

dic = New Dictionary
dic.Value ( “Date” ) = “demain”
dic.Value ( “temps” ) = “fait_mauvais”
List.Add ( dic )

json_in = GenerateJSON ( List )

Try
json_out = ParseJSON ( json_in )
Catch er
tx = er.Message
End Try

2

Quel est le message d’erreur ?

3

ParseJSON retourne un Variant.

json_out devrait être un Variant.

4

il est vide

5

effectivement c est un variant … erreur de débutant !!!
mais on aurait pu penser que xojo refuse la compilation
Merci jeremie

6

A mon avis le compileur valide cette ligne car un Variant peut être assigné à un String, si le variant est un String.
Sauf qu’ici, le variant est un objet (dictionnaire ou array de dictionnaires) et le compileur ne le sait pas avant l’exécution du code.