PowerBuilder

JSON Escape and Unescape a String

Demonstrates how to JSON escape or unescape a string. PowerBuilder

integer li_rc
oleobject loo_Sb

loo_Sb = create oleobject
li_rc = loo_Sb.ConnectToNewObject("Chilkat.StringBuilder")
if li_rc < 0 then
    destroy loo_Sb
    MessageBox("Error","Connecting to COM object failed")
    return
end if

loo_Sb.Append("backslash: \\, A: \u0041")
Write-Debug loo_Sb.GetAsString()

// The output is:
//    backslash: \\, A: \u0041

// The keyword "json" can be used
// to escape and unescape.  To escape is to encode.  To unescape is to decode.

// Unescape (decode) the string in sb.
loo_Sb.Decode("json","utf-8")
Write-Debug loo_Sb.GetAsString()

// After JSON unescaping:
//    backslash: \, A: A

// Now JSON escape the string.
loo_Sb.Encode("json","utf-8")
Write-Debug loo_Sb.GetAsString()

// After JSON escaping:
//    backslash: \\, A: A

// Note: The "A" is not escaped to "\u0041" because there is no need.
// The "\uXXXX" format would be produced for non-printable control chars.


destroy loo_Sb