Unzip a Zip File

Download Chilkat Zip ActiveX

This example shows how to unzip a Zip compression archive.

***********************************************************
*** Visual FoxPro Example Programs by Chilkat Software
*** Visual FoxPro Source Code Examples for Zip Compression
*** Visual FoxPro Examples for Zip Compression
*** Zip Compression in Visual FoxPro
***********************************************************

* Unzip a zip compression archive, automatically
* creating the subdirectories as it unzips.

LOCAL zip

zip = CreateObject('Chilkat.Zip2')
zip.UnlockComponent('anything for 30-day trial')        

* Open a Zip file and Unzip it.  All subdirectories
* are automatically created.
zip.OpenZip("tree.zip")
zip.Extract("./Tree")
zip.CloseZip

RELEASE zip

RETURN .T.

***********************************************************
*** Visual FoxPro Source Code Samples for Zip Compression
*** Visual FoxPro Sample Programs by Chilkat Software
*** Visual FoxPro Samples for Zip Compression
*** Zip Compression in Visual FoxPro
***********************************************************