(Classic ASP) PKCS7 Decrypt MIME

Loads a PKCS7 encrypted MIME file and decrypts. The cert and private key used for decryption is loaded from a PFX file.

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.Mime")
set mime = Server.CreateObject("Chilkat.Mime")

' Load the MIME
success = mime.LoadMimeFile("encryptedMime.txt")
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( mime.LastErrorText) & "</pre>"
    Response.End
End If

' The AddPfxSourceFile and/or AddPfxSourceData
' methods may be called one or more times (one per PFX)
' to add sources from which the MIME component will
' search for certificates and private keys when decrypting.
pfxPassword = "myPassword"
success = mime.AddPfxSourceFile("myCertAndPrivateKey.pfx",pfxPassword)
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( mime.LastErrorText) & "</pre>"
    Response.End
End If

' Decrypt...
success = mime.Decrypt()
If (success = 0) Then
    Response.Write "<pre>" & Server.HTMLEncode( mime.LastErrorText) & "</pre>"
    Response.End
End If

' Display the decrypted MIME:
Response.Write "<pre>" & Server.HTMLEncode( mime.GetMime()) & "</pre>"

%>
</body>
</html>