(DataFlex) Find and Load Certificate by Thumbprint
Demonstrates how to find and load a certificate by SHA1 thumbprint. This is a Microsoft Windows-only example. It assumes the certificate is already installed on the Windows system.
Note: This example requires Chilkat v9.5.0.83 or greater.
Use ChilkatAx-win32.pkg
Procedure Test
Handle hoCert
Boolean iSuccess
String sTemp1
// This example requires Chilkat v9.5.0.83 or greater.
Get Create (RefClass(cComChilkatCert)) To hoCert
If (Not(IsComObjectCreated(hoCert))) Begin
Send CreateComObject of hoCert
End
// The thumbprint can be passed in any encoding, such as hex, base64, etc.
// The 2nd argument indicates the encoding of the 1st argument.
Get ComLoadByThumbprint Of hoCert "ea5a129c1919a52d238ee28d9f3a8f345b768388" "hex" To iSuccess
If (iSuccess = False) Begin
Get ComLastErrorText Of hoCert To sTemp1
Showln sTemp1
Procedure_Return
End
Get ComSubjectDN Of hoCert To sTemp1
Showln "Found: " sTemp1
End_Procedure
|