Xbase++

Decode Base64 to Zip File

See more Base64 Examples

Shows how to decode a baes64 string that is the encoded representation of the bytes that make up a .zip archive. Decodes the base64 and writes the .zip file. Xbase++

LOCAL nSuccess
LOCAL cB64
LOCAL oZipData

nSuccess := 0

cB64 := "UEsDBBQA ... AAALgQAAAAA"

oZipData := CreateObject("Chilkat.BinData")
nSuccess := oZipData:AppendEncoded(cB64, "base64")
nSuccess := oZipData:WriteFile("qa_output/out.zip")
IF (nSuccess != 1)
    ? "failed to write Zip file."
    oZipData:destroy()
    RETURN
ENDIF

oZipData:destroy()