(VBScript) Decode Literal String

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

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

' 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"
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.StringBuilder")
set sb = CreateObject("Chilkat.StringBuilder")
success = sb.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.
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Global")
set glob = CreateObject("Chilkat.Global")
glob.DefaultUtf8 = 1

s = sb.GetAsString()