|
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
(Classic ASP) Append Dir Tree to Existing Zip w/out Rewriting Entire ZipDemonstrates how to use the QuickAppend method to append a directory tree to an existing .zip archive. This method works by editing the existing .zip -- it does not rewrite or recompress the contents of the existing .zip. It is the fastest way to append additional files to a pre-existing large .zip archive. Note: The QuickAppend method is new and available in the pre-release downloads, or in official releases dated after 6-October-2007.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Zip") set zip = Server.CreateObject("Chilkat.Zip") ' The NewZip method only initializes the Zip object -- it does ' not create or write a .zip file. success = zip.NewZip("notUsed.zip") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( zip.LastErrorText) & "</pre>" Response.End End If ' Add a references to all files in a directory tree. ' Note: this does not read or compress the file contents -- ' it simply adds file references to the zip object. recurse = 1 success = zip.AppendFiles("c:/temp/abc123/*",recurse) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( zip.LastErrorText) & "</pre>" Response.End End If ' Appends the contents of the zip object to the preExisting.zip ' zip archive. preExisting.zip is opened, and the files ' referenced by this zip object are streamed in, compressed, ' and appended to the end of the archive. success = zip.QuickAppend("preExisting.zip") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( zip.LastErrorText) & "</pre>" Response.End End If Response.Write "<pre>" & Server.HTMLEncode( "Success!") & "</pre>" ' Note: Additional files, directory trees, or in-memory data ' can be appended by calling AppendOneFileOrDir, AppendFiles, ' AppendString, AppendData, etc. multiple times. ' Whatever files and/or in-memory data that are referenced by ' this zip object will be appended to preExisting.zip when ' QuickAppend is called %> </body> </html> |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.