Chilkat
HOME
Android™
ASP
Visual Basic
VB.NET
C#
iOS (IPhone)
Objective-C
C++
C
MFC
Delphi
FoxPro
Java
Perl
PHP Extension
PHP ActiveX
Python
PowerShell
Ruby
SQL Server
VBScript
|
Generate RSA Public/Private Key Pair and Export to PEMSQL Server example code showing how to generate an RSA public/private key pair and export to PEM files.
CREATE PROCEDURE ChilkatSample AS BEGIN DECLARE @hr int DECLARE @sTmp0 nvarchar(4000) DECLARE @rsa int EXEC @hr = sp_OACreate 'Chilkat.Rsa', @rsa OUT IF @hr <> 0 BEGIN PRINT 'Failed to create ActiveX component' RETURN END DECLARE @success int EXEC sp_OAMethod @rsa, 'UnlockComponent', @success OUT, 'Anything for 30-day trial' IF @success <> 1 BEGIN PRINT 'RSA component unlock failed' RETURN END -- Generate a 1024-bit key. Chilkat RSA supports -- key sizes ranging from 512 bits to 4096 bits. EXEC sp_OAMethod @rsa, 'GenerateKey', @success OUT, 1024 IF @success <> 1 BEGIN EXEC sp_OAGetProperty @rsa, 'LastErrorText', @sTmp0 OUT PRINT @sTmp0 RETURN END -- Keys are exported in XML format: DECLARE @publicKeyXml nvarchar(4000) EXEC sp_OAMethod @rsa, 'ExportPublicKey', @publicKeyXml OUT PRINT @publicKeyXml DECLARE @privateKeyXml nvarchar(4000) EXEC sp_OAMethod @rsa, 'ExportPrivateKey', @privateKeyXml OUT PRINT @privateKeyXml -- Save the private key in PEM format: DECLARE @privKey int EXEC @hr = sp_OACreate 'Chilkat.PrivateKey', @privKey OUT IF @hr <> 0 BEGIN PRINT 'Failed to create ActiveX component' RETURN END EXEC sp_OAMethod @privKey, 'LoadXml', NULL, @privateKeyXml EXEC sp_OAMethod @privKey, 'SaveRsaPemFile', NULL, 'privateKey.pem' -- Save the public key in PEM format: DECLARE @pubKey int EXEC @hr = sp_OACreate 'Chilkat.PublicKey', @pubKey OUT IF @hr <> 0 BEGIN PRINT 'Failed to create ActiveX component' RETURN END EXEC sp_OAMethod @pubKey, 'LoadXml', NULL, @publicKeyXml EXEC sp_OAMethod @pubKey, 'SaveOpenSslPemFile', NULL, 'publicKey.pem' END GO |
© 2000-2010 Chilkat Software, Inc. All Rights Reserved.