Export Certificate to DER or PEM

Demonstrates how to export a digital certificate to PEM or DER format.

Dim cert As New ChilkatCert

'  Th LoadByCommonName method searches the Windows
'  Current User Certificate Store and Local Machine Certificate
'  Store for a certificate whose common name (CN) matches
'  the argument:
Dim success As Long
success = cert.LoadByCommonName("Chilkat Software, Inc.")
If (success = 0) Then
    MsgBox "Failed to find certificate!"
Else

    '  Export certificate to a PEM file
    cert.ExportCertPemFile "cert.pem"

    '  Export certificate to a DER file
    cert.ExportCertDerFile "cert.der"

    '  Export cert to a PEM string:
    Text1.Text = Text1.Text & cert.ExportCertPem() & vbCrLf
    Text1.Refresh

End If

'  The Chilkat Certificate, Certificate Store, Private Key,
'  Public Key, and Key Container classes / objects are freeware.

'  They are used by and included with the Chilkat Email,
'  Crypt, S/MIME, and other commercial Chilkat components.