DataFlex

Add a PFX Source to MailMan for Decryption

Demonstrates the Chilkat MailMan.AddPfxSourceFile method, which adds a PFX/PKCS#12 file to the MailMan object's internal list of sources used for locating certificates and private keys — for example, to decrypt S/MIME email downloaded from the server. The second argument is the PFX password. This example configures a POP3 connection and registers a PFX source.

Background: When MailMan downloads an encrypted (S/MIME) message, it needs the recipient's private key to decrypt it. On Windows and macOS the OS certificate stores are searched automatically, but when the key lives in a standalone PFX file — common on Linux or in server deployments — AddPfxSourceFile tells MailMan where to find it. A PFX bundles the certificate and its private key in one password-protected file.

Chilkat DataFlex Downloads

Download Chilkat for DataFlex

DataFlex

Use ChilkatAx-win32.pkg

Procedure Test
    Boolean iSuccess
    Handle hoMailman
    String sTemp1

    Move False To iSuccess

    //  Demonstrates the MailMan.AddPfxSourceFile method, which adds a PFX/PKCS#12 file to the
    //  MailMan object's internal list of sources used for locating certificates and private
    //  keys (for example, to decrypt downloaded S/MIME email).  The 2nd argument is the PFX
    //  password.

    Get Create (RefClass(cComChilkatMailMan)) To hoMailman
    If (Not(IsComObjectCreated(hoMailman))) Begin
        Send CreateComObject of hoMailman
    End

    //  Configure the POP3 server connection.
    Set ComMailHost Of hoMailman To "pop.example.com"
    Set ComMailPort Of hoMailman To 995
    Set ComPopSsl Of hoMailman To True
    Set ComPopUsername Of hoMailman To "user@example.com"
    Set ComPopPassword Of hoMailman To "myPassword"

    //  Provide a PFX so that encrypted emails downloaded from the server can be decrypted.

    Get ComAddPfxSourceFile Of hoMailman "qa_data/certs/decryption.pfx" "pfx_password" To iSuccess
    If (iSuccess = False) Begin
        Get ComLastErrorText Of hoMailman To sTemp1
        Showln sTemp1
        Procedure_Return
    End

    Showln "Added the PFX certificate/private-key source."

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


End_Procedure