Unzip a .zip Archive

Demonstrates how to open a .zip archive and unzip. The Unzip method extracts the files and directories from a .zip archive and recreates the directory tree rooted at the directory path passed to Unzip.

Download Chilkat 32-bit Zip ActiveX (.msi) (includes objects for .zip, .gz, .bz2, and .Z)

Download All 32-bit Chilkat ActiveX Components (.zip)

Download All 64-bit Chilkat ActiveX Components (.zip)

LOCAL loZip
LOCAL lnSuccess
LOCAL lnUnzipCount

loZip = CreateObject('Chilkat.Zip2')

*  Any string unlocks the component for the 1st 30-days.
lnSuccess = loZip.UnlockComponent("Anything for 30-day trial")
IF (lnSuccess <> 1) THEN
    ? loZip.LastErrorText
    QUIT
ENDIF

lnSuccess = loZip.OpenZip("my_files.zip")
IF (lnSuccess <> 1) THEN
    ? loZip.LastErrorText
    QUIT
ENDIF

*  Returns the number of files and directories unzipped.
*  Unzips to /my_files, re-creating the directory tree
*  from the .zip.
lnUnzipCount = loZip.Unzip("/my_files")
IF (lnUnzipCount < 0) THEN
    ? loZip.LastErrorText
ELSE
    =MESSAGEBOX("Success!")
ENDIF