(Xojo Plugin) RSA OAEP Padding

Demonstrates how to use OAEP padding with the RSA encryption algorithm. More information about OAEP Padding.

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

// RSA public key in XML format:
Dim publicKey As String
publicKey = "<RSAPublicKey><Modulus>of3im3mRgd2NLXIGoK6uYLg6jj0Ug2b42rnqa5Tbwz2ieFqMJqt+++x2oqLYGurlz49nt+7/785g3XYWqoka4u9c9zul6YubIjnBM72dQy7rEkEfbUxgjcxqXyjZFx+FpaxFUecLu688XEu+9UA42VKiCgcl+E7TrqnfeeYpNXc=</Modulus><Exponent>AQAB</Exponent></RSAPublicKey>"

Dim success As Boolean
success = rsa.ImportPublicKey(publicKey)

// To use Optimal Asymmetric Encryption Padding (OAEP) padding,
// simply set the OaepPadding property:
rsa.OaepPadding = True

// Encrypt a string and return the encrypted data base64-encoded:
rsa.EncodingMode = "base64"

Dim plainText As String
plainText = "RSA Encryption should be easy."

Dim usePrivateKey As Boolean
usePrivateKey = False
Dim encryptedStr As String
encryptedStr = rsa.EncryptStringENC(plainText,usePrivateKey)
System.DebugLog(encryptedStr)