Visual Basic 6.0

Load Base64-encoded X.509 Certificate (.cer)

See more Certificates Examples

Loads a digital certificate from a base64 encoded DER X.509 Certificate (.cer, .crt) and fetches information about the cert. Visual Basic 6.0

Dim success As Long
success = 0

Dim cert As New ChilkatCert

' LoadFromFile will load virtually any certificate format file.
' It will auto-recognize the format and load appropiately.
' A base64-encoded DER X.509 certificate file
' contains the binary DER in base64 encoded form.
' Therefore, it is a text file that will begin like this:
' -----BEGIN CERTIFICATE-----
' MIIFbjCCBFagAwIBAgIGdDPNv/L0MA0GCSqGSIb3DQEBBQUAMIHKMQswCQYDVQQG
' EwJVUzEQMA4GA1UECBMHQXJpem9uYTETMBEGA1UEBxMKU2NvdHRzZGFsZTEaMBgG
' ...

success = cert.LoadFromFile("/Users/chilkat/testData/cer/chilkat_base64.cer")
If (success <> 1) Then
    Debug.Print cert.LastErrorText
    Exit Sub
End If

' DN = "Distinguished Name"
Debug.Print "SubjectDN:" & cert.SubjectDN

Debug.Print "Common Name:" & cert.SubjectCN
Debug.Print "Issuer Common Name:" & cert.IssuerCN

Debug.Print "Serial Number:" & cert.SerialNumber