Utilisation de Json.net avec Windev

Version imprimable

Bonjour,

J'utilise la librairie Json.NET, qui me permet de lire un item et de convertir un tableau en JSON.

Mon problème, je n'arrive pas à convertir du json vers un tableau. Quelqu'un a-t-il une idée ?

Exemple de json :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
 
{
   "clients":[
      {
         "id":"1",
         "code":"123",
         "nom":"test1",
         "adresse":"test1",
         "code_postal":"12345",
         "ville":"test1"
      },
      {
         "id":"2",
         "code":"124",
         "nom":"test2",
         "adresse":"test2",
         "code_postal":"12345",
         "ville":"test2"
      },
      {
         "id":"3",
         "code":"125",
         "nom":"test3",
         "adresse":"test3",
         "code_postal":"12345",
         "ville":"test3"
      }
   ]
}

Url de la lib :
http://json.codeplex.com/

Merci
Vincent

Pour un Json simple, j'arrive à récupérer les valeurs avec le code suivant :

Json :

Code:

1
2
 
{"connexion":"yes","jeton":"525310ff-f03e-a0c9-021a-000038a8469a"}

windev:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
pclJson est un JObject dynamique // Objet JSON
pclToken est un JObject dynamique // Token
sConnexion, sUid sont des chaînes // Donnée à récupérer
pclJson = JObject.Parse(sResult) // Parse la chaîne
 
pclToken = pclJson.get_Item("connexion")
SI pclToken <> Null ALORS
	sConnexion = pclToken.ToString()
FIN
 
pclToken = pclJson.get_Item("jeton")
SI pclToken <> Null ALORS
	sUid = pclToken.ToString()
FIN

...

Je continu mon monologue, j'arrive finalement à parser mon json. J'ai besoin d'aide pour l'optimisation ... :aie:

Attention code potentiellement horrible :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
 
pclJson est un JObject dynamique // Objet JSON
pclToken est un JObject dynamique // Token
pclToken2 est un JObject dynamique // Token
pclToken3 est un JObject dynamique // Token
pclTokenArr est un JArray dynamique
sJsonNom, sJsonCode, sJsonAdresse sont des chaînes // Donnée à récupérer
nbItem est un entier
nInd est un entier = 0
 
pclJson = JObject.Parse(sResult)
pclToken = pclJson.SelectToken("rows")
 
pclToken3 = pclToken.get_Count()
nbItem = pclToken3.ToString()
 
TANTQUE nInd<nbItem
	pclToken2 = pclToken.get_Item(nInd)
 
	pclTokenArr = pclToken2.get_Item("id")
	sJsonNom = pclTokenArr.ToString()
	Trace("id : " + sJsonNom)
 
	pclTokenArr = pclToken2.get_Item("code")
	sJsonCode = pclTokenArr.ToString()
	Trace("Code : " + sJsonCode)
 
	pclTokenArr = pclToken2.get_Item("adresse")
	sJsonAdresse = pclTokenArr.ToString()
	Trace("Adresse : " + sJsonAdresse)
 
	nInd++
FIN

Code:

1
2
// Qu'elle dll est à charger pour pouvoir parser le JSON
ChargeDLL ??

Merci de vos réponses