(Visual FoxPro) Untar a .tar.bz2 Compressed Archive
Untar a .tar.bz2 compressed archive.
LOCAL loTar
LOCAL lnSuccess
* This example assumes the Chilkat API to have been previously unlocked.
* See Global Unlock Sample for sample code.
* Untar a .tar archive.
* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Tar')
loTar = CreateObject('Chilkat.Tar')
* Untar into c:/temp/untarDir. The directory tree(s) contained
* within the TAR archive will be re-created rooted at this
* directory.
loTar.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.
loTar.NoAbsolutePaths = 1
lnSuccess = loTar.UntarBz2("/Users/chilkat/testData/tar/abc123.tar.bz2")
IF (lnSuccess <> 1) THEN
? loTar.LastErrorText
ELSE
? "Success"
ENDIF
RELEASE loTar
|