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
128-Bit Blowfish Encrypted Zip
Example program showing how to create a 128-bit Blowfish Encrypted Zip using the Chilkat Zip .NET component. Dim zip As New Chilkat.Zip() ' Anything begins the 30-day trial Dim unlocked As Boolean unlocked = zip.UnlockComponent("30-day trial") If (Not unlocked) Then MsgBox("Failed to unlock Zip library") Exit Sub End If zip.NewZip("test.zip") ' Create the Zip with 128-bit Blowfish encryption ' Set Encryption = 1 for Blowfish. 0 = no encryption, 2 = twofish, 3 = AES, 4 = WinZip compatible AES zip.Encryption = 1 ' Key length can be 128-bit, 192-bit, or 256-bit zip.EncryptKeyLength = 128 zip.SetPassword("myPassword") ' Append files to the Blowfish Encrypted Zip. Dim success As Boolean zip.AppendFromDir = "c:/temp/something" ' Add the entire directory tree. success = zip.AppendFiles("*", True) If (Not success) Then MsgBox(zip.LastErrorText) Exit Sub End If ' Write the Blowfish Encrypted Zip file. success = zip.WriteZipAndClose() If (Not success) Then MsgBox(zip.LastErrorText) Else MsgBox("Created Blowfish Encrypted Zip!") End If Important: The download for this
example does not contain the ChilkatDotNet.dll which |
© 2000-2012 Chilkat Software, Inc. All Rights Reserved.