Classic ASP Requires Chilkat v11.7.0+
Classic ASP
Find Out Whether a PDF Needs a Password Before Loading It
See more PDF Protection Examples
Demonstrates PreLoadCheck, which examines a PDF file without loading it and without any password. It reports whether the file is encrypted, by which method and algorithm, whether a password is needed to open it, and what its permissions are. An application uses it to decide whether to ask for a password, or which certificate it needs, before calling LoadFile. PreLoadCheckBd does the same for a PDF held in memory.Chilkat Classic ASP Downloads
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0
' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
' The PDF used in this example is available at two_page_memo.pdf
' The PDF used in this example is available at encrypted_user_password.pdf
' The PDF used in this example is available at no_copy_permission.pdf
set pdf = Server.CreateObject("Chilkat.Pdf")
set info = Server.CreateObject("Chilkat.JsonObject")
' A PDF that is not encrypted. Nothing but "encrypted" is reported for it.
success = pdf.PreLoadCheck("qa_data/pdf/two_page_memo.pdf",info)
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( pdf.LastErrorText) & "</pre>"
Response.End
End If
Response.Write "<pre>" & Server.HTMLEncode( "two_page_memo.pdf") & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( " encrypted: " & info.BoolOf("encrypted")) & "</pre>"
' A PDF that needs a password to open.
success = pdf.PreLoadCheck("qa_data/pdf/encrypted_user_password.pdf",info)
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( pdf.LastErrorText) & "</pre>"
Response.End
End If
Response.Write "<pre>" & Server.HTMLEncode( "encrypted_user_password.pdf") & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( " encrypted: " & info.BoolOf("encrypted")) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( " method: " & info.StringOf("method")) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( " algorithm: " & info.StringOf("algorithm")) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( " openPasswordRequired: " & info.BoolOf("openPasswordRequired")) & "</pre>"
' A PDF that opens without a password but is restricted. The permissions are readable without
' any password.
success = pdf.PreLoadCheck("qa_data/pdf/no_copy_permission.pdf",info)
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( pdf.LastErrorText) & "</pre>"
Response.End
End If
Response.Write "<pre>" & Server.HTMLEncode( "no_copy_permission.pdf") & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( " encrypted: " & info.BoolOf("encrypted")) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( " openPasswordRequired: " & info.BoolOf("openPasswordRequired")) & "</pre>"
Response.Write "<pre>" & Server.HTMLEncode( " may copy: " & info.BoolOf("permissions.copy")) & "</pre>"
' The typical use: ask for a password only when one is needed, then load.
success = pdf.PreLoadCheck("qa_data/pdf/encrypted_user_password.pdf",info)
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( pdf.LastErrorText) & "</pre>"
Response.End
End If
If (info.BoolOf("openPasswordRequired") = 1) Then
' An application would prompt for the password here.
pdf.UserPassword = "secret"
End If
success = pdf.LoadFile("qa_data/pdf/encrypted_user_password.pdf")
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( pdf.LastErrorText) & "</pre>"
Response.End
End If
Response.Write "<pre>" & Server.HTMLEncode( "loaded, pages: " & pdf.NumPages) & "</pre>"
' Sample output:
' two_page_memo.pdf
' encrypted: False
' encrypted_user_password.pdf
' encrypted: True
' method: password
' algorithm: rc4-128
' openPasswordRequired: True
' no_copy_permission.pdf
' encrypted: True
' openPasswordRequired: False
' may copy: False
' loaded, pages: 1
%>
</body>
</html>