B4X Requires Chilkat v11.0.0+

Load PEM Public/Private Key into RSA Object

See more RSA Examples

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

Dim success As Boolean = False

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

Dim rsa As ChilkatRsa
rsa.Initialize

'  First demonstrate importing a PEM public key:
Dim publicKeyPem As String = "PEM public-key data goes here"
Dim pubkey As ChilkatPublicKey
pubkey.Initialize

success = pubkey.LoadFromString(publicKeyPem)
If success = False Then
    Log(pubkey.LastErrorText)
    Return
End If


success = rsa.UsePublicKey(pubkey)
If success = False Then
    Log(rsa.LastErrorText)
    Return
End If


'  Demonstrate importing a PEM private key:
Dim privateKeyPem As String = "PEM private-key data goes here"
Dim privkey As ChilkatPrivateKey
privkey.Initialize("privkey")

'  If the private key PEM is protected with a password, then 
'  call LoadEncryptedPem.  Otherwise call LoadPem.
success = privkey.LoadPem(privateKeyPem)
If success = False Then
    Log(privkey.LastErrorText)
    Return
End If


success = rsa.UsePrivateKey(privkey)
If success = False Then
    Log(rsa.LastErrorText)
    Return
End If


Log("OK!")