(Xojo Plugin) Generate RSA Key and return Base64 PKCS8 Private Key
Demonstrates how to generate a new 2048-bit RSA private key and returns the Base64 encoded PKCS8 representation of the private key. Note: This example requires Chilkat v11.0.0 or greater.
Dim success As Boolean
success = False
Dim rsa As New Chilkat.Rsa
// Generate a 2048-bit key. Chilkat RSA supports
// key sizes ranging from 512 bits to 8192 bits.
Dim privKey As New Chilkat.PrivateKey
success = rsa.GenKey(2048,privKey)
If (success = False) Then
System.DebugLog(rsa.LastErrorText)
Return
End If
// Get the private key in PKCS8 Base64 format
Dim privKeyPkcs8Base64 As String
privKeyPkcs8Base64 = privKey.GetPkcs8ENC("base64")
// The key in base64 format will start similar to this:
// MIIEvAIBADANBgkqhkiG9w0BA...
System.DebugLog(privKeyPkcs8Base64)
|