(Visual Basic 6.0) Untar a .tar Archive
Untar a .tar archive.
' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
' Untar a .tar archive.
Dim tar As New ChilkatTar
Dim fileCount As Long
' Untar into c:/temp/untarDir. The directory tree(s) contained
' within the TAR archive will be re-created rooted at this
' directory.
tar.UntarFromDir = "/Users/chilkat/temp/untarDir"
' If any filepaths within the Tar archive are absolute,
' automatically make them relative by removing the first
' forward or backward slash. This protects from untarring
' files to unexpected locations.
tar.NoAbsolutePaths = 1
fileCount = tar.Untar("/Users/chilkat/testData/tar/abc123.tar")
If (fileCount < 0) Then
Debug.Print tar.LastErrorText
Else
Debug.Print "Untarred " & fileCount & " files and directories"
End If
|