Xbase++

Loading and Parsing a JSON Array

See more JSON Examples

A JSON array is JSON that begins with "[" and ends with "]". For example, this is a JSON array that contains 3 JSON objects.

[{"name":"jack"},{"name":"john"},{"name":"joe"}]

A JSON object, however, is JSON that begins with "{" and ends with "}". For example, this JSON is an object that contains an array.

{"pets":[{"name":"jack"},{"name":"john"},{"name":"joe"}]}

This example shows how loading a JSON array is different than loading a JSON object. Xbase++

LOCAL cStrJsonArray
LOCAL cStrJsonObject
LOCAL oJsonArray
LOCAL i
LOCAL oJsonObj
LOCAL oJsonObject
LOCAL nNumPets

cStrJsonArray := '[{"name":"jack"},{"name":"john"},{"name":"joe"}]'

cStrJsonObject := '{"pets":[{"name":"jack"},{"name":"john"},{"name":"joe"}]}'

//  A JSON array must be loaded using JsonArray:
oJsonArray := CreateObject("Chilkat.JsonArray")
oJsonArray:Load(cStrJsonArray)

//  Examine the values:
i := 0
DO WHILE i < oJsonArray:Size
    oJsonObj := oJsonArray:ObjectAt(i)
    ? Str(i) + ": " + oJsonObj:StringOf("name")
    oJsonObj:destroy()
    i := i + 1
ENDDO

//  Output is:

//  	0: jack
//  	1: john
//  	2: joe

//  A JSON object must be loaded using JsonObject
oJsonObject := CreateObject("Chilkat.JsonObject")
oJsonObject:Load(cStrJsonObject)

//  Examine the values:
i := 0
nNumPets := oJsonObject:SizeOfArray("pets")
DO WHILE i < nNumPets
    oJsonObject:I := i
    ? Str(i) + ": " + oJsonObject:StringOf("pets[i].name")
    i := i + 1
ENDDO

//  Output is:

//  	0: jack
//  	1: john
//  	2: joe

oJsonArray:destroy()
oJsonObject:destroy()