Visual Basic 6.0

Decompress Gzip Data In-Place Using BinData

See more Gzip Examples

This example demonstrates how to use the UncompressBd method to decompress Gzip data stored in a BinData object.

The compressed .gz file is first loaded into memory. The UncompressBd method then decompresses the data in-place, meaning the original compressed bytes in the BinData object are replaced with the uncompressed data.

After decompression, the example writes the resulting data to a file. This approach is useful when working entirely in memory before saving or further processing the uncompressed data.

Visual Basic 6.0

Dim success As Long
success = 0

' This example demonstrates how to decompress Gzip data stored in a BinData object.
' The decompression is done in-place, replacing the compressed data with the original data.

Dim gzip As New ChilkatGzip
Dim bd As New ChilkatBinData

' Load a .gz file into BinData:
success = bd.LoadFile("example.txt.gz")
If (success = 0) Then
    Debug.Print bd.LastErrorText
    Exit Sub
End If

Debug.Print "Compressed size (bytes): " & bd.NumBytes

' Uncompress the data in-place:
success = gzip.UncompressBd(bd)
If (success = 0) Then
    Debug.Print gzip.LastErrorText
    Exit Sub
End If

Debug.Print "Decompressed size (bytes): " & bd.NumBytes

' Save the uncompressed data to a file:
success = bd.WriteFile("example.txt")
If (success = 0) Then
    Debug.Print bd.LastErrorText
    Exit Sub
End If

Debug.Print "File successfully uncompressed to example.txt"