(AutoIt) Decrypt a .p7m File (using a PFX)
AutoIt sample code showing how to decrypt a .p7m using a .p12 / .pfx certificate w/ private key.
; This example requires the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.
$oCrypt = ObjCreate("Chilkat.Crypt2")
; Use a digital certificate and private key from a PFX file (.pfx or .p12).
Local $sPfxPath = "myCertAndKey.pfx"
Local $sPfxPassword = "test123"
Local $bSuccess = $oCrypt.AddPfxSourceFile($sPfxPath,$sPfxPassword)
If ($bSuccess <> True) Then
ConsoleWrite($oCrypt.LastErrorText & @CRLF)
Exit
EndIf
; Set the outPath to whatever is appropriate.
; If you are decrypting a PDF, your output might be "out.pdf"...
Local $sInPath = "smime.p7m"
Local $sOutPath = "original.txt"
; Indicate that we're doing public key decryption (i.e. PKCS7)
$oCrypt.CryptAlgorithm = "pki"
$bSuccess = $oCrypt.CkDecryptFile($sInPath,$sOutPath)
If ($bSuccess = False) Then
ConsoleWrite($oCrypt.LastErrorText & @CRLF)
Exit
EndIf
ConsoleWrite("Success." & @CRLF)
|