GZip and Un-GZip a File

Download Chilkat Zip ActiveX

Visual Basic 6.0 example to GZip and un-GZip a file.

    ' Add a reference to the Chilkat GZip component in your VB6 project.
    ' The GZip component is included in the "Chilkat Zip" license
    Dim gz As New Gzip
    gz.UnlockComponent "Anything for 30-day trial"
    
    ' The GZip file format is not an archive that contains many
    ' files, such as .zip or .tar.  It is a file format that compresses
    ' a single file.
    fname = "test.txt"
    
    ' Compress the file, creating an output file with the original
    ' filename + ".gz"
    gz.CompressFile fname, fname & ".gz"
    
    ' To ungzip, we do this:
    gz.UncompressFile fname & ".gz", "output.txt"