Add a PFX Source to MailMan from BinData

See more POP3 Examples

Demonstrates the Chilkat MailMan.AddPfxSourceBd method, which adds a PFX/PKCS#12 certificate store to the MailMan object's internal list of sources used for locating certificates and private keys. The first argument is a BinData containing the PFX bytes and the second is the PFX password. This example loads a PFX into a BinData, registers it, and fetches a message Chilkat can decrypt.

Dim success As Long
success = 0

'  Demonstrates the MailMan.AddPfxSourceBd method, which adds a PFX/PKCS#12 certificate store
'  to the MailMan object's internal list of sources used for locating certificates and
'  private keys.  The 1st argument is a BinData containing the PFX bytes and the 2nd is the
'  PFX password.

Dim mailman As New ChilkatMailMan

'  Configure the POP3 server connection.
mailman.MailHost = "pop.example.com"
mailman.MailPort = 995
mailman.PopSsl = 1
mailman.PopUsername = "user@example.com"
mailman.PopPassword = "myPassword"

'  Load the PFX bytes into a BinData (they could come from a file, database, or secrets store).
Dim bdPfx As New ChilkatBinData
success = bdPfx.LoadFile("qa_data/certs/decryption.pfx")
If (success = 0) Then
    Debug.Print bdPfx.LastErrorText
    Exit Sub
End If

'  Add the PFX as a source of certificates and private keys.
success = mailman.AddPfxSourceBd(bdPfx,"pfx_password")
If (success = 0) Then
    Debug.Print mailman.LastErrorText
    Exit Sub
End If

'  Fetch a message; if it is encrypted, Chilkat can decrypt it using the PFX source.
Dim email As New ChilkatEmail
success = mailman.FetchOne(0,0,1,email)
If (success = 0) Then
    Debug.Print mailman.LastErrorText
    Exit Sub
End If

Debug.Print "Decrypted = " & email.Decrypted

'  Note: The path "qa_data/certs/decryption.pfx" is a relative local filesystem path,
'  relative to the current working directory of the running application.

'  Note: Explicitly connecting/authenticating is optional.  Chilkat MailMan automatically
'  connects and authenticates -- using the property settings above -- whenever a server
'  operation requires it.  Calling the explicit connect/authenticate methods can still be
'  helpful to determine whether a failure occurs while connecting or while authenticating.