Visual FoxPro

Decode Base64

Demonstrates how to decode base64. Visual FoxPro

LOCAL lnSuccess
LOCAL loBd
LOCAL lcPassword

lnSuccess = 0

loBd = CreateObject('Chilkat.BinData')

* Append a base64 string to bd.
lnSuccess = loBd.AppendEncoded("c2VjcmV0","base64")

* The bd now contains the decoded bytes.
* Let's say it was a password string..
lcPassword = loBd.GetString("utf-8")

* Decodes to "secret".
? "password = " + lcPassword

RELEASE loBd