Visual Basic 6.0

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. Visual Basic 6.0

Dim success As Long
success = 0

Dim b64 As String
b64 = "UEsDBBQA ... AAALgQAAAAA"

Dim zipData As New ChilkatBinData
success = zipData.AppendEncoded(b64,"base64")
success = zipData.WriteFile("qa_output/out.zip")
If (success <> 1) Then
    Debug.Print "failed to write Zip file."
    Exit Sub
End If