Create WinZip Compatible AES Encrypted Zip

Download Chilkat 32-bit Zip ActiveX (.msi) (includes objects for .zip, .gz, .bz2, and .Z)

Download All 32-bit Chilkat ActiveX Components (.zip)

Download All 64-bit Chilkat ActiveX Components (.zip)

Create WinZip Compatible AES Encrypted Zip.

set zip = CreateObject("Chilkat.Zip2")
zip.UnlockComponent "anything for 30-day trial"

' Set Encryption = 4 for WinZip compatible AES encryption.
zip.Encryption = 4
zip.EncryptKeyLength = 256
zip.SetPassword "test"

zip.NewZip "myZip1.zip"

' You may either append files from directories,
' or append from in-memory data:
recurseDirectories = 0
zip.AppendFiles "myFiles/*",recurseDirectories
zip.AppendData "test.txt","test test test"

zip.WriteZipAndClose