PFX to PEM (Certificate and Private Key Files)

Export a certificate and private key from a PFX to a pair of PEM files.

Download Chilkat .NET for 4.0 Framework

Download Chilkat .NET for 64-bit 4.0 Framework (x64)

Download Chilkat .NET for 2.0 / 3.5 Framework

Download Chilkat .NET for 64-bit 2.0 / 3.5 Framework (x64)

Download Chilkat .NET for 1.0 / 1.1 Framework

Dim success As Boolean
Dim certStore As New Chilkat.CertStore()

'  Load the PFX file into a certificate store object
Dim password As String
password = "myPassword"
success = certStore.LoadPfxFile("chilkat.pfx",password)
If (success <> true) Then
    MsgBox(certStore.LastErrorText)
    Exit Sub
End If


'  Find the cert to be exported by the subject:
Dim cert As Chilkat.Cert
cert = certStore.FindCertBySubject("Chilkat Software, Inc.")
If (cert Is Nothing ) Then
    MsgBox("Certificate not found.")
    Exit Sub
End If



'  Does this cert have a private key?
If (cert.HasPrivateKey() = true) Then

    '  Get the private key.
    Dim pvkey As Chilkat.PrivateKey
    pvkey = cert.ExportPrivateKey()

    '   Export the private key to a PEM file:
    success = pvkey.SaveRsaPemFile("chilkat_pkey.pem")
    If (success <> true) Then
        MsgBox(pvkey.LastErrorText)
        Exit Sub
    End If




End If



'  Save the cert to a PEM file:
success = cert.ExportCertPemFile("chilkat_cert.pem")
If (success <> true) Then
    MsgBox(cert.LastErrorText)
    Exit Sub
End If