(Xojo Plugin) 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.
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
Dim zip As New Chilkat.Zip
Dim success As Boolean
success = zip.OpenZip("my_files.zip")
If (success <> True) Then
System.DebugLog(zip.LastErrorText)
Return
End If
Dim unzipCount As Int32
// Returns the number of files and directories unzipped.
// Unzips to /my_files, re-creating the directory tree
// from the .zip.
unzipCount = zip.Unzip("/my_files")
If (unzipCount < 0) Then
System.DebugLog(zip.LastErrorText)
Else
System.DebugLog("Success!")
End If
|