Sample code for 30+ languages & platforms
Unicode C

Duplicate openssl pkcs12 –export –in certfile.cer –inkey certfile.key –out certfile.pfx

See more OpenSSL Examples

How to create a PKCS12 (.p12 or .pfx) from a certificate file and private key file: Demonstrates how to duplicate this OpenSSL command:
Duplicate openssl pkcs12 –export –in certfile.cer –inkey certfile.key –out certfile.pfx

Chilkat Unicode C Downloads

Unicode C
#include <C_CkPrivateKeyW.h>
#include <C_CkCertW.h>
#include <C_CkCertChainW.h>
#include <C_CkPfxW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkPrivateKeyW pkey;
    HCkCertW cert;
    HCkCertChainW certChain;
    HCkPfxW pfx;
    const wchar_t *password;

    success = FALSE;

    // This example assumes the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    pkey = CkPrivateKeyW_Create();

    // Load the private key from the file.
    success = CkPrivateKeyW_LoadAnyFormatFile(pkey,L"certFile.key",L"");
    if (success != TRUE) {
        wprintf(L"%s\n",CkPrivateKeyW_lastErrorText(pkey));
        CkPrivateKeyW_Dispose(pkey);
        return;
    }

    cert = CkCertW_Create();
    // The LoadFromFile method auto-recognizes the format...
    success = CkCertW_LoadFromFile(cert,L"certfile.cer");
    if (success != TRUE) {
        wprintf(L"%s\n",CkCertW_lastErrorText(cert));
        CkPrivateKeyW_Dispose(pkey);
        CkCertW_Dispose(cert);
        return;
    }

    // We'll need a cert chain object to create the PKCS12, so get it
    // from the cert.  

    certChain = CkCertW_GetCertChain(cert);
    if (!CkCertW_getLastMethodSuccess(cert)) {
        wprintf(L"%s\n",CkCertW_lastErrorText(cert));
        CkPrivateKeyW_Dispose(pkey);
        CkCertW_Dispose(cert);
        return;
    }

    // Create the PFX object, add the cert and private key, and write to a .pfx file.
    pfx = CkPfxW_Create();

    // The cert(s) are automatically added in the call to AddPrivateKey
    success = CkPfxW_AddPrivateKey(pfx,pkey,certChain);
    if (success != TRUE) {
        wprintf(L"%s\n",CkPfxW_lastErrorText(pfx));
        CkPrivateKeyW_Dispose(pkey);
        CkCertW_Dispose(cert);
        CkPfxW_Dispose(pfx);
        return;
    }

    // Write the .pfx to a file.
    password = L"myPassword";
    success = CkPfxW_ToFile(pfx,password,L"certfile.pfx");
    if (success != TRUE) {
        wprintf(L"%s\n",CkPfxW_lastErrorText(pfx));
        CkPrivateKeyW_Dispose(pkey);
        CkCertW_Dispose(cert);
        CkPfxW_Dispose(pfx);
        return;
    }

    wprintf(L"Success.\n");


    CkPrivateKeyW_Dispose(pkey);
    CkCertW_Dispose(cert);
    CkPfxW_Dispose(pfx);

    }