Visual FoxPro

Emit JSON Array to StringBuilder

See more JSON Examples

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

LOCAL lnSuccess
LOCAL a
LOCAL s
LOCAL loSb

lnSuccess = 0

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
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