Chilkat HOME Android™ ASP Visual Basic VB.NET C# iOS (IPhone) Objective-C C++ C Unicode C++ Unicode C MFC Delphi DLL Delphi ActiveX FoxPro Java Perl PHP Extension PHP ActiveX Python PowerShell Ruby SQL Server VBScript
|
|
Load PEM Public/Private Key into RSA ObjectDemonstrates how to load a PEM key into the Chilkat RSA object.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% set rsa = Server.CreateObject("Chilkat.Rsa") success = rsa.UnlockComponent("Anything for 30-day trial") If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( rsa.LastErrorText) & "</pre>" End If ' First demonstrate importing a PEM public key: publicKeyPem = "PEM public-key data goes here" set pubkey = Server.CreateObject("Chilkat.PublicKey") success = pubkey.LoadOpenSslPem(publicKeyPem) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( pubkey.LastErrorText) & "</pre>" End If publicKeyXml = pubkey.GetXml() success = rsa.ImportPublicKey(publicKeyXml) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( rsa.LastErrorText) & "</pre>" End If ' Demonstrate importing a PEM private key: privateKeyPem = "PEM private-key data goes here" set privkey = Server.CreateObject("Chilkat.PrivateKey") ' If the private key PEM is protected with a password, then ' call LoadEncryptedPem. Otherwise call LoadPem. success = privkey.LoadPem(privateKeyPem) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( privkey.LastErrorText) & "</pre>" End If privateKeyXml = privkey.GetXml() success = rsa.ImportPrivateKey(privateKeyXml) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( rsa.LastErrorText) & "</pre>" End If Response.Write "<pre>" & Server.HTMLEncode("OK!") & "</pre>" %> </body> </html> |
© 2000-2013 Chilkat Software, Inc. All Rights Reserved.