(PowerBuilder) Unzip an Entire ZIP Archive While Preserving Directory Structure

See more Zip Examples

Extract an Entire ZIP Archive While Preserving Directory Structure

This example demonstrates how to use the Unzip method to extract all files and directories from a ZIP archive.

The example shows how the stored ZIP directory structure is recreated beneath the target extraction directory.

Suppose the ZIP archive contains:

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

After extraction to:

c:/temp/testDir

The following filesystem structure 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

If the target extraction directory does not already exist, it is automatically created.

The Unzip method returns the number of files extracted, or -1 if the extraction fails.

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

integer li_rc
integer li_Success
oleobject loo_Zip
integer li_NumFilesUnzipped

li_Success = 0

loo_Zip = create oleobject
li_rc = loo_Zip.ConnectToNewObject("Chilkat.Zip")
if li_rc < 0 then
    destroy loo_Zip
    MessageBox("Error","Connecting to COM object failed")
    return
end if

// Open an existing ZIP archive.
li_Success = loo_Zip.OpenZip("qa_data/zips/sample.zip")
if li_Success = 0 then
    Write-Debug loo_Zip.LastErrorText
    destroy loo_Zip
    return
end if

// ------------------------------------------------------------
// Extract all files to:
// 
//     c:/temp/testDir
// 
// If the target directory does not already exist,
// Chilkat will automatically create it.
// 
// The Unzip method recreates the stored ZIP directory
// structure beneath the target directory.
// 
li_NumFilesUnzipped = loo_Zip.Unzip("c:/temp/testDir")

if li_NumFilesUnzipped < 0 then
    Write-Debug loo_Zip.LastErrorText
    destroy loo_Zip
    return
end if

Write-Debug "Number of files extracted = " + string(li_NumFilesUnzipped)
Write-Debug ""

// ------------------------------------------------------------
// Suppose the ZIP archive contains these entries:
// 
//     aaa/pigs.json
//     bbb/base64Cert.txt
//     bbb/sub1/brasil_cert.pem
//     bbb/sub2/penguins.gif
//     bbb/sub2/starfish.jpg
//     hamlet.xml
//     hello.pdf
// 
// After extraction, the following files will exist:
// 
//     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
// 
// The ZIP directory structure is preserved during extraction.

// Close the ZIP archive.
loo_Zip.CloseZip()

Write-Debug "Unzip completed successfully."


destroy loo_Zip