(Xojo Plugin) Generate an RSA Key and Save to Encrypted PEM

See more RSA Examples

Demonstrates how to generate an RSA key and save to an encrypted PEM file.

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

Dim rsa As New Chilkat.Rsa

// Generate a 2048-bit key.
Dim success As Boolean
success = rsa.GenerateKey(2048)
If (success = False) Then
    System.DebugLog(rsa.LastErrorText)
    Return
End If

Dim privKey As Chilkat.PrivateKey
privKey = rsa.ExportPrivateKeyObj()
Dim password As String
password = "secret"
// Saving to a relative path (from the current working directory of the process).
Dim path As String
path = "rsaKeys/myTestRsaPrivate.pem"
// Encrypt the PEM using 256-bit AES encryption.
privKey.Pkcs8EncryptAlg = "aes256"
success = privKey.SavePkcs8EncryptedPemFile(password,path)
If (success = False) Then
    System.DebugLog(privKey.LastErrorText)
    Return
End If

// 

// We can also save the public key.
// There is no need to encrypt public keys.
Dim pubKey As Chilkat.PublicKey
pubKey = rsa.ExportPublicKeyObj()
path = "rsaKeys/myTestRsaPublic.pem"
// Choose PKCS1 or PKCS8
// We'll choose PKCS8.
Dim preferPkcs1 As Boolean
preferPkcs1 = False
success = pubKey.SavePemFile(preferPkcs1,path)
If (success = False) Then
    System.DebugLog(pubKey.LastErrorText)
    Return
End If

// 

System.DebugLog("Success.")