(Visual FoxPro) Unzip

See more Zip Examples

Unzip a zip archive, creating the subfolders as needed.

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

LOCAL loZip
LOCAL lnSuccess
LOCAL lnNumFilesUnzipped

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

* For versions of Chilkat < 10.0.0, use CreateObject('Chilkat_9_5_0.Zip')
loZip = CreateObject('Chilkat.Zip')

lnSuccess = loZip.OpenZip("qa_data/zips/sample.zip")
IF (lnSuccess <> 1) THEN
    ? loZip.LastErrorText
    RELEASE loZip
    CANCEL
ENDIF

* Unzip to c:/temp/testDir
* If c:/temp/testDir does not yet exist, it will be auto-created.
lnNumFilesUnzipped = loZip.Unzip("c:/temp/testDir")
IF (lnNumFilesUnzipped < 0) THEN
    ? loZip.LastErrorText
    RELEASE loZip
    CANCEL
ENDIF

* If, for example, the zip contained these files:

* aaa/pigs.json
* bbb/base64Cert.txt
* bbb/sub1/brasil_cert.pem
* bbb/sub2/penguins.gif
* bbb/sub2/starfish.jpg
* hamlet.xml
* hello.pdf

* then after unzipping, the following files will be created:

* c:/temp/testDir/aaa/pigs.json
* c:/temp/testDir/bbb/base64Cert.txt
* c:/temp/testDir/bbb/sub1/brasil_cert.pem
* c:/temp/testDir/bbb/sub2/penguins.gif
* c:/temp/testDir/bbb/sub2/starfish.jpg
* c:/temp/testDir/hamlet.xml
* c:/temp/testDir/hello.pdf

loZip.CloseZip()

RELEASE loZip