Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Lianja) 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. loZip = createobject("CkZip") llSuccess = loZip.NewZip("test.zip") if (llSuccess <> .T.) then ? loZip.LastErrorText release loZip return endif // 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. llRecurse = .T. llSuccess = loZip.AppendFiles("c:/temp/a/*",llRecurse) if (llSuccess <> .T.) then ? loZip.LastErrorText release loZip return endif llSuccess = loZip.WriteZipAndClose() if (llSuccess <> .T.) then ? loZip.LastErrorText release loZip return endif ? "Zip Created!" release loZip |
© 2000-2023 Chilkat Software, Inc. All Rights Reserved.