(Visual Basic 6.0) Unzip a ZIP Entry Directly into a BinData Object Using ZipEntry.UnzipToBd

See more Zip Examples

This example demonstrates how to use the ZipEntry.UnzipToBd method to inflate a ZIP entry directly into a BinData object.

The entry contents are uncompressed entirely in memory without creating a file on disk.

This is useful when:

• Processing ZIP entry data entirely in memory
• Avoiding temporary filesystem files
• Working with binary files such as images, PDFs, or certificates
• Passing uncompressed ZIP data directly to other APIs

The example opens a ZIP archive, locates a PDF entry, inflates it into a BinData object, and then writes the uncompressed bytes to a new file.

Suppose the ZIP archive contains:

docs/report.pdf

The entry is uncompressed directly into memory before optionally being saved to:

qa_output/report.pdf

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

Dim success As Long
success = 0

Dim zip As New ChilkatZip

' Open an existing ZIP archive.
success = zip.OpenZip("qa_data/zips/documents.zip")
If (success = 0) Then
    Debug.Print zip.LastErrorText
    Exit Sub
End If

' Locate the PDF entry within the ZIP archive.
Dim entry As New ChilkatZipEntry

success = zip.EntryOf("docs/report.pdf",entry)
If (success = 0) Then
    Debug.Print "ZIP entry not found."
    zip.CloseZip 
    Exit Sub
End If

' ------------------------------------------------------------
' Inflate the ZIP entry directly into a BinData object.
' 
' The uncompressed bytes are stored entirely in memory.
' 
Dim pdfData As New ChilkatBinData

success = entry.UnzipToBd(pdfData)
If (success = 0) Then
    Debug.Print entry.LastErrorText
    Exit Sub
End If

Debug.Print "Uncompressed size = " & pdfData.NumBytes
Debug.Print ""

' ------------------------------------------------------------
' Optionally save the uncompressed bytes to a file.
' 
success = pdfData.WriteFile("qa_output/report.pdf")
If (success = 0) Then
    Debug.Print pdfData.LastErrorText
    Exit Sub
End If

zip.CloseZip 

Debug.Print "PDF extracted successfully."