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

Please ask...

Although we really tried hard, there are always questions left open.

Please send us your question.
We would be glad to answer it.

Aloaha Software