(Classic ASP) 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

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Zip")
set zip = Server.CreateObject("Chilkat.Zip")

' 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.

success = zip.OpenZip("something.zip")
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( zip.LastErrorText) & "</pre>"
    Response.End
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
bPwdProt = zip.PasswordProtect
If (bPwdProt) Then
    Response.Write "<pre>" & Server.HTMLEncode( "This zip is password-protected.") & "</pre>"
End If

' If the zip is AES encrypted (WinZip compatible) then
' the Encryption property will be equal to 4.
encValue = zip.Encryption
If (encValue = 4) Then
    Response.Write "<pre>" & Server.HTMLEncode( "This zip is AES encrypted.") & "</pre>"
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.

zip.CloseZip 

%>
</body>
</html>