Visual FoxPro

JSON Escape and Unescape a String

Demonstrates how to JSON escape or unescape a string. Visual FoxPro

LOCAL loSb

loSb = CreateObject('Chilkat.StringBuilder')

loSb.Append("backslash: \\, A: \u0041")
? loSb.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.
loSb.Decode("json","utf-8")
? loSb.GetAsString()

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

* Now JSON escape the string.
loSb.Encode("json","utf-8")
? loSb.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.

RELEASE loSb