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
(SQL Server) PKCS11 Change Normal User PIN from Non-Logged-In StateSee more PKCS11 ExamplesWhen SetPin is called from a non-logged-in state, then it is the Normal User PIN that is changed. Note: Requires Chilkat v9.5.0.89 or greater.
// Important: See this note about string length limitations for strings returned by sp_OAMethod calls. // CREATE PROCEDURE ChilkatSample AS BEGIN DECLARE @hr int DECLARE @iTmp0 int DECLARE @sTmp0 nvarchar(4000) -- This example requires the Chilkat API to have been previously unlocked. -- See Global Unlock Sample for sample code. -- Note: Chilkat's PKCS11 implementation runs on Windows, Linux, Mac OS X, and other supported operating systems. DECLARE @pkcs11 int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.Pkcs11', @pkcs11 OUT IF @hr <> 0 BEGIN PRINT 'Failed to create ActiveX component' RETURN END -- See PKCS11 Find Driver Library Path for information about how to find the -- PKCS11 driver file (if not explicitly known) for the plugged-in token or smart card in reader. EXEC sp_OASetProperty @pkcs11, 'SharedLibPath', 'IDPrimePKCS1164.dll' DECLARE @success int EXEC sp_OAMethod @pkcs11, 'Initialize', @success OUT IF @success = 0 BEGIN EXEC sp_OAGetProperty @pkcs11, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 EXEC @hr = sp_OADestroy @pkcs11 RETURN END -- Call Discover to get the slot ID. DECLARE @onlyTokensPresent int SELECT @onlyTokensPresent = 1 DECLARE @json int EXEC @hr = sp_OACreate 'Chilkat_9_5_0.JsonObject', @json OUT EXEC sp_OAMethod @pkcs11, 'Discover', @success OUT, @onlyTokensPresent, @json IF @success = 0 BEGIN EXEC sp_OAGetProperty @pkcs11, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 EXEC @hr = sp_OADestroy @pkcs11 EXEC @hr = sp_OADestroy @json RETURN END -- Make sure we have at least one slot. EXEC sp_OAMethod @json, 'SizeOfArray', @iTmp0 OUT, 'slot' IF @iTmp0 <= 0 BEGIN PRINT 'No occuplied slots.' EXEC @hr = sp_OADestroy @pkcs11 EXEC @hr = sp_OADestroy @json RETURN END -- Get the ID of the 1st slot DECLARE @slotID int EXEC sp_OAMethod @json, 'IntOf', @slotID OUT, 'slot[0].id' -- Open a session. DECLARE @readWrite int SELECT @readWrite = 1 EXEC sp_OAMethod @pkcs11, 'OpenSession', @success OUT, @slotID, @readWrite IF @success = 0 BEGIN EXEC sp_OAGetProperty @pkcs11, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 EXEC @hr = sp_OADestroy @pkcs11 EXEC @hr = sp_OADestroy @json RETURN END -- We haven't logged in, but we can set the Normal User's PIN directly by providing -- the existing PIN, and the new PIN. -- Change the PIN from 1234 to 0000 EXEC sp_OAMethod @pkcs11, 'SetPin', @success OUT, '1234', '0000' IF @success = 0 BEGIN EXEC sp_OAGetProperty @pkcs11, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 EXEC sp_OAMethod @pkcs11, 'CloseSession', @success OUT EXEC @hr = sp_OADestroy @pkcs11 EXEC @hr = sp_OADestroy @json RETURN END -- When finished, close the session. -- It is important to close the session (memory leaks will occur if the session is not properly closed). EXEC sp_OAMethod @pkcs11, 'CloseSession', @success OUT IF @success = 0 BEGIN EXEC sp_OAGetProperty @pkcs11, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 EXEC @hr = sp_OADestroy @pkcs11 EXEC @hr = sp_OADestroy @json RETURN END PRINT 'Successfully changed PIN from 1234 to 0000' EXEC @hr = sp_OADestroy @pkcs11 EXEC @hr = sp_OADestroy @json END GO |
© 2000-2023 Chilkat Software, Inc. All Rights Reserved.