Chilkat • HOME • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi DLL • Go • Java • Node.js • Objective-C • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(Xojo Plugin) Zip a Directory TreeDemonstrates how to zip an entire directory tree into a .zip archive.
// 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.NewZip("test.zip") If (success <> True) Then System.DebugLog(zip.LastErrorText) Return End If // Append a directory tree. The call to AppendFiles does // not read the file contents or append them to the zip // object in memory. It simply appends references // to the files so that when WriteZip or WriteZipAndClose // is called, the referenced files are streamed and compressed // into the .zip output file. Dim recurse As Boolean recurse = True success = zip.AppendFiles("c:/temp/a/*",recurse) If (success <> True) Then System.DebugLog(zip.LastErrorText) Return End If success = zip.WriteZipAndClose() If (success <> True) Then System.DebugLog(zip.LastErrorText) Return End If System.DebugLog("Zip Created!") |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.