(Excel) 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.

Download Excel Class Modules Chilkat Excel Class Modules

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

' This is the URL encoding of the windows-1252 representation.

nameWindows1252UrlEncoded = "M%C6RSK"

' This is the URL encoding of the utf-8 representation.

nameUtf8UrlEncoded = "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 Chilkat.StringBuilder
Set sb1 = Chilkat.NewStringBuilder

success = sb1.DecodeAndAppend(nameWindows1252UrlEncoded,"url","windows-1252")

Dim sb2 As Chilkat.StringBuilder
Set sb2 = Chilkat.NewStringBuilder
success = sb2.DecodeAndAppend(nameUtf8UrlEncoded,"url","utf-8")

' sb1 and sb2 both hold the same string.

bEqual = sb1.ContentsEqualSb(sb2,True)
Debug.Print "bEqual = "; bEqual

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