(Xojo Plugin) X509Certificate GetCertHash SHA256
Shows how to get the SHA256 hash of a certificate.
Dim cert As New Chilkat.Cert
Dim success As Boolean
// Load a certificate object with a certificate.
// The certificate object could have come from any source,
// or perhaps was obtained from another Chilkat function.
// The source does not matter. What matters is that we have
// a cert object loaded with the certificate..
success = cert.LoadFromFile("qa_data/certs/cert_test123.cer")
If (success <> True) Then
System.DebugLog(cert.LastErrorText)
Return
End If
// Get the binary DER of the certificae, and compute the SHA256 hash:
Dim bdDer As New Chilkat.BinData
success = cert.ExportCertDerBd(bdDer)
// Get the base64 representation of the SHA256 hash.
Dim certHash As String
certHash = bdDer.GetHash("sha256","base64")
System.DebugLog("Certificate hash in base64 = " + certHash)
|