(Visual Basic 6.0) GZip Tar Extract (.tgz or .tar.gz)

Demonstrates how to extract the contents of a GZip compressed Tar archive (.tgz or .tar.gz).

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

' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

Dim gzip As New ChilkatGzip

' Ungzip and untar.
Dim bNoAbsolute As Long
bNoAbsolute = 1
Dim untarToDirectory As String
untarToDirectory = "/temp/test"
' bNoAbsolute tells the component to convert all absolute paths
' found in the .tar to relative paths.   For example, if the .tar
' contains a file with an absolute path such as
' "/usr/bin/something.exe" it will
' be extracted to "/temp/test/usr/bin/something.exe"
Dim success As Long
success = gzip.UnTarGz("test.tar.gz",untarToDirectory,bNoAbsolute)
If (success <> 1) Then
    Debug.Print gzip.LastErrorText
    Exit Sub
End If