(PowerBuilder) Determine if a Zip is Encrypted or Password-Protected

Determines whether or not a zip archive is AES encrypted or password-protected.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

integer li_rc
oleobject loo_Zip
integer li_Success
integer li_BPwdProt
integer li_EncValue

// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

loo_Zip = create oleobject
// Use "Chilkat_9_5_0.Zip" for versions of Chilkat < 10.0.0
li_rc = loo_Zip.ConnectToNewObject("Chilkat.Zip")
if li_rc < 0 then
    destroy loo_Zip
    MessageBox("Error","Connecting to COM object failed")
    return
end if

// An encrypted or password-protected zip can be opened
// without specifying the password.  However, the contents
// of the files cannot be unzipped without providing the correct
// password.

li_Success = loo_Zip.OpenZip("something.zip")
if li_Success <> 1 then
    Write-Debug loo_Zip.LastErrorText
    destroy loo_Zip
    return
end if

// If the zip is password-protected, meaning that it uses
// the old (insecure) Zip 2.0 encryption, then the
// PasswordProtect property will be 1
li_BPwdProt = loo_Zip.PasswordProtect
if li_BPwdProt then
    Write-Debug "This zip is password-protected."
end if

// If the zip is AES encrypted (WinZip compatible) then
// the Encryption property will be equal to 4.
li_EncValue = loo_Zip.Encryption
if li_EncValue = 4 then
    Write-Debug "This zip is AES encrypted."
end if

// If the Encryption property = 0, then the zip is NOT
// strong encrypted, and is either password-protected or
// entirely unencrypted, depending on the value of the
// PasswordProtect property.

loo_Zip.CloseZip()


destroy loo_Zip