(SQL Server) .Z File Compression
Use LZW compression to create a .Z compressed file. Compresses any single file into a .Z format compressed file.
(Chilkat's .Z compression functionality is included as part of the Chilkat Zip license.)
-- Important: See this note about string length limitations for strings returned by sp_OAMethod calls.
--
CREATE PROCEDURE ChilkatSample
AS
BEGIN
DECLARE @hr int
-- Important: Do not use nvarchar(max). See the warning about using nvarchar(max).
DECLARE @sTmp0 nvarchar(4000)
-- This example assumes the Chilkat API to have been previously unlocked.
-- See Global Unlock Sample for sample code.
DECLARE @uc int
-- Use "Chilkat_9_5_0.UnixCompress" for versions of Chilkat < 10.0.0
EXEC @hr = sp_OACreate 'Chilkat.UnixCompress', @uc OUT
IF @hr <> 0
BEGIN
PRINT 'Failed to create ActiveX component'
RETURN
END
DECLARE @success int
EXEC sp_OAMethod @uc, 'CompressFile', @success OUT, 'hamlet.xml', 'hamlet.xml.Z'
IF @success <> 1
BEGIN
EXEC sp_OAGetProperty @uc, 'LastErrorText', @sTmp0 OUT
PRINT @sTmp0
END
ELSE
BEGIN
PRINT 'Success.'
END
EXEC @hr = sp_OADestroy @uc
END
GO
|