(Visual FoxPro) Emit JSON Array to StringBuilder

See more JSON Examples

Demonstrates how to write a JSON array to a Chilkat StringBuilder object.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

LOCAL a
LOCAL lnSuccess
LOCAL s
LOCAL loSb

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.JsonArray')
a = CreateObject('Chilkat.JsonArray')
lnSuccess = a.Load("[ 1,2,3,4 ]")

* We could get the JSON array as a string...
s = a.Emit()
? s

* But what if the JSON array contains a huge amount of data,
* and we don't want to marshal it all from Chilkat's internal
* native code to a string in our programming language?

* You can instead emit to a Chilkat StringBuilder
* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.StringBuilder')
loSb = CreateObject('Chilkat.StringBuilder')
a.EmitSb(loSb)

* Perhaps the StringBuilder object can be passed to other methods..
* Chilkat typically provides methods where a potentially large string
* can be passed in via a StringBuilder object..

* Or perhaps you wish to save to a file..
lnSuccess = loSb.WriteFile("c:/temp/qa_output/a.json","utf-8",0)

RELEASE a
RELEASE loSb