(PowerBuilder) JSON Append String Array

Demonstrates how to append an array of strings from a string table object.

Note: This example uses the AppendStringTable method, which was introduced in Chilkat v9.5.0.67

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

integer li_rc
oleobject loo_Json
oleobject loo_St

loo_Json = create oleobject
// Use "Chilkat_9_5_0.JsonObject" for versions of Chilkat < 10.0.0
li_rc = loo_Json.ConnectToNewObject("Chilkat.JsonObject")
if li_rc < 0 then
    destroy loo_Json
    MessageBox("Error","Connecting to COM object failed")
    return
end if
loo_Json.EmitCompact = 0

loo_Json.AppendString("abc","123")

loo_St = create oleobject
// Use "Chilkat_9_5_0.StringTable" for versions of Chilkat < 10.0.0
li_rc = loo_St.ConnectToNewObject("Chilkat.StringTable")

loo_St.Append("a")
loo_St.Append("b")
loo_St.Append("c")
loo_St.Append("d")

loo_Json.AppendStringArray("strArray",loo_St)

Write-Debug loo_Json.Emit()

// Output:

// 	{
// 	  "abc": "123",
// 	  "strArray": [
// 	    "a",
// 	    "b",
// 	    "c",
// 	    "d"
// 	  ]
// 	}


destroy loo_Json
destroy loo_St