B4X

Decode from Binary Encoding and Append String

Demonstrates how to decode from a binary encoding (base64, hex, url, etc.) and then append the decoded string to a Chilkat StringBuilder object.

Note: This example uses the new DecodeAndAppend method added in Chilkat v9.5.0.87.

B4X

Dim success As Boolean = False

'  We have the string "MÆRSK" in two forms:

'  This is the URL encoding of the windows-1252 representation.
Dim nameWindows1252UrlEncoded As String = "M%C6RSK"

'  This is the URL encoding of the utf-8 representation.
Dim nameUtf8UrlEncoded As String = "M%C3%86RSK"

'  Note that the result of loading a string into a string object 
'  is the same if we correctly specify the underlying charset encoding.
'  In the above example, we have the same string, but in different charset encodings
'  subsequently URL encoded.
Dim sb1 As ChilkatStringBuilder
sb1.Initialize
success = sb1.DecodeAndAppend(nameWindows1252UrlEncoded, "url", "windows-1252")

Dim sb2 As ChilkatStringBuilder
sb2.Initialize
success = sb2.DecodeAndAppend(nameUtf8UrlEncoded, "url", "utf-8")

'  sb1 and sb2 both hold the same string.
Dim bEqual As Boolean = sb1.ContentsEqualSb(sb2, True)
Log("bEqual = " & bEqual)

'  We can see the string is "MÆRSK" in both cases.
Log(sb1.GetAsString)
Log(sb2.GetAsString)