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) Create .taz, .tar.Z TAR ArchiveDemonstrates how to create a compressed TAR archive containing an entire directory tree. This example creates a compressed archive using Unix "Z" compression. The typical file extensions used are .tar.Z and .taz.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' This example assumes 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.Tar") set tar = Server.CreateObject("Chilkat.Tar") ' The TAR component will produce a GNU tar 1.13.x format ' archive by default. ' It is also possible to create PAX -- POSIX 1003.1-2001 format ' or USTAR -- POSIX 1003.1-1988 format. ' Set the WriteFormat property to "gnu", "pax", or "ustar" to ' choose the output TAR format: tar.WriteFormat = "gnu" ' Add a directory tree to be included in the output TAR archive: success = tar.AddDirRoot("/Users/chilkat/temp/abc123") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( tar.LastErrorText) & "</pre>" Response.End End If ' First write a .tar, then compress to a .Z using UnixCompress. success = tar.WriteTar("/Users/chilkat/testData/tar/abc123.tar") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( tar.LastErrorText) & "</pre>" Response.End End If ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.UnixCompress") set uc = Server.CreateObject("Chilkat.UnixCompress") success = uc.CompressFile("/Users/chilkat/testData/tar/abc123.tar","/Users/chilkat/testData/tar/abc123.tar.Z") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( uc.LastErrorText) & "</pre>" Else Response.Write "<pre>" & Server.HTMLEncode( "Success.") & "</pre>" End If %> </body> </html> |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.