Show Card Certificates API
With the following code sample it is possible to display the signature certificate of your smartcard.
Dim csp
Dim reader
'reader number can be of the range 0 - 9
'zero is first connected card reader
reader = 0
Set csp = CreateObject("aloahacsp.aloaha_csp")
If csp.set_reader(CLng(reader)) = True Then
Call csp.show_ROOTCertificate
Call csp.show_Certificate
End If
Set csp = nothing
Aloaha Software / Knowledge Base / Smart Card API / Show Card Certificates