Convert to DER encoded X.509 Certificate (.cer, .crt)

Loads a digital certificate from any format and saves to a binary DER encoded X.509 Certificate (.cer, .crt).

Dim cert As New ChilkatCert

Dim success As Long

'  LoadFromFile will load virtually any certificate format file.
'  It will auto-recognize the format and load appropiately.
'  In this case, load a PEM format certificate and convert to DER.
success = cert.LoadFromFile("/Users/chilkat/testData/pem/chilkat.pem")
If (success <> 1) Then
    Text1.Text = Text1.Text & cert.LastErrorText & vbCrLf
    Exit Sub
End If

success = cert.ExportCertDerFile("chilkat.der")
If (success <> 1) Then
    Text1.Text = Text1.Text & cert.LastErrorText & vbCrLf
    Exit Sub
End If

Text1.Text = Text1.Text & "Converted certificate from PEM to DER format." & vbCrLf