Visual FoxPro

Decode Literal String

Decode a literal string. See Avoid Non-usascii Literal Strings in Source Code Visual FoxPro

LOCAL s
LOCAL loSb
LOCAL loGlob
LOCAL s

*  It's best not to use non-usascii literal strings in source code.
*  Instead, use a binary encoded representation of the string.

*  This is the string "44ης Οδός, αρ.2" encoded as quoted-printable.
*  Use Chilkat's online tool to prepare encoded strings: Online Binary Encoder
*  Note: For strings that have very few us-ascii chars, it's better to use base64 encoding instead of quoted-printable.
s = "44=CE=B7=CF=82 =CE=9F=CE=B4=CF=8C=CF=82, =CE=B1=CF=81.2"
loSb = CreateObject('Chilkat.StringBuilder')
loSb.AppendEncoded(s,"quoted-printable")

*  For programming languages where strings are exposed bytes, you can tell Chilkat globally
*  to give you the utf-8 byte representation.
*  For programming languages where strings are opaque objects, such as C#, it doesn't matter.
loGlob = CreateObject('Chilkat.Global')
loGlob.DefaultUtf8 = 1

s = loSb.GetAsString()

RELEASE loSb
RELEASE loGlob