|
Chilkat • HOME • .NET Core C# • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi ActiveX • Delphi DLL • Go • Java • Lianja • Mono C# • Node.js • Objective-C • PHP ActiveX • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift 2 • Swift 3,4,5... • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(Classic ASP) ScMinidriver - Find and Load Certificate from Smart Card or USB TokenSee more ScMinidriver ExamplesDemonstrates how to find and load a specific certificate located on a smart card or USB token.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.ScMinidriver") set scmd = Server.CreateObject("Chilkat.ScMinidriver") ' Reader names (smart card readers or USB tokens) can be discovered ' via List Readers or Find Smart Cards readerName = "SCM Microsystems Inc. SCR33x USB Smart Card Reader 0" success = scmd.AcquireContext(readerName) If (success = 0) Then Response.Write "<pre>" & Server.HTMLEncode( scmd.LastErrorText) & "</pre>" Response.End End If ' If successful, the name of the currently inserted smart card is available: Response.Write "<pre>" & Server.HTMLEncode( "Card name: " & scmd.CardName) & "</pre>" ' If desired, perform regular PIN authentication with the smartcard. ' For more details about smart card PIN authentication, see the Smart Card PIN Authentication Example retval = scmd.PinAuthenticate("user","000000") If (retval <> 0) Then Response.Write "<pre>" & Server.HTMLEncode( "PIN Authentication failed.") & "</pre>" End If ' You can find a cerficate using any of the following certificate parts: ' "subjectDN" -- The full distinguished name of the cert. ' "subjectDN_withTags" -- Same as above, but in a format that includes the subject part tags, such as the "CN=" in "CN=something" ' "subjectCN" -- The common name part (CN) of the certificate's subject. ' "serial" -- The certificate serial number. ' "serial:issuerCN" -- The certificate serial number + the issuer's common name, delimited with a colon char. ' These are the same certificate parts that can be retrieved by listing certificates on the smart card (or USB token). ' See List Certificates on Smart Card Example certPart = "subjectCN" partValue = "PIVKey E42D60A759D39147A26E0AF2FB1183C5" ' If the certificate is found, it is loaded into the cert object. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Cert") set cert = Server.CreateObject("Chilkat.Cert") success = scmd.FindCert(certPart,partValue,cert) If (success = 0) Then Response.Write "<pre>" & Server.HTMLEncode( "Failed to find the certificate.") & "</pre>" Else Response.Write "<pre>" & Server.HTMLEncode( "Successfully loaded the cert object from the smart card / USB token.") & "</pre>" ' Note: When successful, the cert object is internally linked to the ScMinidriver object's authenticated session. ' The cert object can now be used to sign or do other cryptographic operations that occur on the smart card / USB token. ' If your application calls PinDeauthenticate or DeleteContext, the cert will no longer be able to sign on the smart card ' because the smart card ScMinidriver session will no longer be authenticated or deleted. End If ' ... ' ... ' ... ' When finished with operations that required authentication, you may if you wish, deauthenticate the session. success = scmd.PinDeauthenticate("user") If (success = 0) Then Response.Write "<pre>" & Server.HTMLEncode( scmd.LastErrorText) & "</pre>" End If ' Delete the context when finished with the card. success = scmd.DeleteContext() If (success = 0) Then Response.Write "<pre>" & Server.HTMLEncode( scmd.LastErrorText) & "</pre>" End If %> </body> </html> |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.