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
|
Verify a Zip's PasswordDemonstrates how to verify the password for an encrypted or password-protected zip archive.
CREATE PROCEDURE ChilkatSample AS BEGIN DECLARE @hr int DECLARE @sTmp0 nvarchar(4000) DECLARE @zip int EXEC @hr = sp_OACreate 'Chilkat.Zip2', @zip OUT IF @hr <> 0 BEGIN PRINT 'Failed to create ActiveX component' RETURN END DECLARE @success int -- Any string unlocks the component for the 1st 30-days. EXEC sp_OAMethod @zip, 'UnlockComponent', @success OUT, 'Anything for 30-day trial' IF @success <> 1 BEGIN EXEC sp_OAGetProperty @zip, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 RETURN END -- To verify a password for a Zip, the Zip must be opened: EXEC sp_OAMethod @zip, 'OpenZip', @success OUT, 'myProtected.zip' IF @success <> 1 BEGIN EXEC sp_OAGetProperty @zip, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 RETURN END -- Set the password to be verified: EXEC sp_OASetProperty @zip, 'DecryptPassword', 'secret' DECLARE @passwordOk int EXEC sp_OAMethod @zip, 'VerifyPassword', @passwordOk OUT IF @passwordOk = 1 BEGIN PRINT 'Password is correct.' END ELSE BEGIN PRINT 'Password is incorrect.' END EXEC sp_OAMethod @zip, 'CloseZip', NULL END GO |
© 2000-2010 Chilkat Software, Inc. All Rights Reserved.