Chilkat
HOME
Android™
ASP
Visual Basic
VB.NET
C#
iOS (IPhone)
Objective-C
C++
C
MFC
Delphi
FoxPro
Java
Perl
PHP Extension
PHP ActiveX
Python
PowerShell
Ruby
SQL Server
VBScript
|
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.
CREATE PROCEDURE ChilkatSample AS BEGIN DECLARE @hr int DECLARE @sTmp0 nvarchar(4000) -- Important: It is helpful to send the contents of the -- tar.LastErrorText property when requesting support. DECLARE @tar int EXEC @hr = sp_OACreate 'Chilkat.Tar', @tar OUT IF @hr <> 0 BEGIN PRINT 'Failed to create ActiveX component' RETURN END -- Any string automatically begins a fully-functional 30-day trial. DECLARE @success int EXEC sp_OAMethod @tar, 'UnlockComponent', @success OUT, 'Anything for 30-day trial' IF @success <> 1 BEGIN EXEC sp_OAGetProperty @tar, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 RETURN END -- 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: EXEC sp_OASetProperty @tar, 'WriteFormat', 'gnu' -- Add a directory tree to be included in the output TAR archive: EXEC sp_OAMethod @tar, 'AddDirRoot', @success OUT, '/Users/chilkat/temp/abc123' IF @success <> 1 BEGIN EXEC sp_OAGetProperty @tar, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 RETURN END -- First write a .tar, then compress to a .Z using UnixCompress. EXEC sp_OAMethod @tar, 'WriteTar', @success OUT, '/Users/chilkat/testData/tar/abc123.tar' IF @success <> 1 BEGIN EXEC sp_OAGetProperty @tar, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 RETURN END DECLARE @uc int EXEC @hr = sp_OACreate 'Chilkat.UnixCompress', @uc OUT IF @hr <> 0 BEGIN PRINT 'Failed to create ActiveX component' RETURN END EXEC sp_OAMethod @uc, 'CompressFile', @success OUT, '/Users/chilkat/testData/tar/abc123.tar', '/Users/chilkat/testData/tar/abc123.tar.Z' IF @success <> 1 BEGIN EXEC sp_OAGetProperty @uc, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 END ELSE BEGIN PRINT 'Success.' END END GO |
© 2000-2010 Chilkat Software, Inc. All Rights Reserved.