Smartkarten Zertifikate anzeigen
Mit dem folgenden Beispiel ist es möglich die Signaturzertifikate einer Smartkarte aufzulisten:
Dim csp
Dim reader
'Kartenlesernummer kann von 0 bis 9 sein
'0 ist der erste angeschlossene Kartenleser
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 / Produkte / Aloaha Smartcard SDK / Smartkarten Zertifikate anzeigen
