(Lianja) JSON: Access Array Values

Demonstrates how to access values in a JSON array.

Chilkat Lianja Extension Download Chilkat Lianja Extension

loJson = createobject("CkJsonObject")

lcJsonStr = '{ "id": 1, "name": "A green door", "tags": ["home", 22, "green"], "price": 125 }'

llSuccess = loJson.Load(lcJsonStr)
if (llSuccess <> .T.) then
    ? loJson.LastErrorText
    release loJson
    return
endif

// Get the "tags" array, which contains "home", 22, "green"
loTagsArray = loJson.ArrayOf("tags")
if (loJson.LastMethodSuccess = .F.) then
    ? "tags member not found."
    release loJson
    return
endif

// Get the value at each array index. 
// Output will be:
// [0] = home
// [0] as integer = 0
// [1] = 22
// [1] as integer = 22
// [2] = green
// [2] as integer = 0

lnArraySize = loTagsArray.Size

for i = 0 to lnArraySize - 1

    lcSValue = loTagsArray.StringAt(i)

    ? "[" + str(i) + "] = " + lcSValue

    lnIValue = loTagsArray.IntAt(i)
    ? "[" + str(i) + "] as integer = " + str(lnIValue)

next

release loTagsArray

// Note: The StringAt method returns the value as a string regardless of the type.

// The IntAt method returns the value as an integer.  If the value does not convert to 
// an integer, then 0 is returned


release loJson