(Xojo Plugin) Load PEM Public/Private Key into RSA Object

Demonstrates how to load a PEM key into the Chilkat RSA object.

Chilkat Xojo Plugin Download Xojo Plugin for Windows, Linux, Mac OS X, and ARM, ARM64

// This example assumes the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.

Dim rsa As New Chilkat.Rsa

// First demonstrate importing a PEM public key:
Dim publicKeyPem As String
publicKeyPem = "PEM public-key data goes here"
Dim pubkey As New Chilkat.PublicKey

Dim success As Boolean
success = pubkey.LoadFromString(publicKeyPem)
If (success <> True) Then
    System.DebugLog(pubkey.LastErrorText)
    Return
End If

Dim publicKeyXml As String
publicKeyXml = pubkey.GetXml()

success = rsa.ImportPublicKey(publicKeyXml)
If (success <> True) Then
    System.DebugLog(rsa.LastErrorText)
    Return
End If

// Demonstrate importing a PEM private key:
Dim privateKeyPem As String
privateKeyPem = "PEM private-key data goes here"
Dim privkey As New Chilkat.PrivateKey

// If the private key PEM is protected with a password, then 
// call LoadEncryptedPem.  Otherwise call LoadPem.
success = privkey.LoadPem(privateKeyPem)
If (success <> True) Then
    System.DebugLog(privkey.LastErrorText)
    Return
End If

Dim privateKeyXml As String
privateKeyXml = privkey.GetXml()
success = rsa.ImportPrivateKey(privateKeyXml)
If (success <> True) Then
    System.DebugLog(rsa.LastErrorText)
    Return
End If

System.DebugLog("OK!")