B4X

JSON Escape and Unescape a String

Demonstrates how to JSON escape or unescape a string. B4X

Dim sb As ChilkatStringBuilder
sb.Initialize

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

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

'  Now JSON escape the string.
sb.Encode("json", "utf-8")
Log(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.