Chilkat • HOME • Android™ • Classic ASP • C • C++ • C# • Mono C# • .NET Core C# • C# UWP/WinRT • DataFlex • Delphi ActiveX • Delphi DLL • Visual FoxPro • Java • Lianja • MFC • Objective-C • Perl • PHP ActiveX • PHP Extension • PowerBuilder • PowerShell • PureBasic • CkPython • Chilkat2-Python • Ruby • SQL Server • Swift 2 • Swift 3,4,5... • Tcl • Unicode C • Unicode C++ • Visual Basic 6.0 • VB.NET • VB.NET UWP/WinRT • VBScript • Xojo Plugin • Node.js • Excel • Go
(Excel) PKCS7 Decrypt MIMELoads a PKCS7 encrypted MIME file and decrypts. The cert and private key used for decryption is loaded from a PFX file.
' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim mime As Chilkat.Mime Set mime = Chilkat.NewMime ' Load the MIME success = mime.LoadMimeFile("encryptedMime.txt") If (success = False) Then Debug.Print mime.LastErrorText Exit Sub 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 = False) Then Debug.Print mime.LastErrorText Exit Sub End If ' Decrypt... success = mime.Decrypt() If (success = False) Then Debug.Print mime.LastErrorText Exit Sub End If ' Display the decrypted MIME: Debug.Print mime.GetMime() |
© 2000-2022 Chilkat Software, Inc. All Rights Reserved.