(AutoIt) RSA Encrypt Hash using SHA256 hash function and SHA1 mask function

Note: This example requires a feature introduced in Chilkat v9.5.0.66

How can this Javascript be duplicated using Chilkat?

function a(e, t) {
                var r = s.pki.publicKeyFromPem(e)
                  , n = r.encrypt(t, "RSA-OAEP", {
                    md: s.md.sha256.create(),
                    mgf1: {
                        md: s.md.sha1.create()
                    }
                });
                return s.util.encode64(n)
            }

Note: The OAEP padding uses random bytes in the padding, and therefore each time encryption happens, even using the same data and key, the result will be different -- but still valid. One should not expect to get the same output.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

; Note: This example requires a feature introduced in Chilkat v9.5.0.66

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

$oPubkey = ObjCreate("Chilkat.PublicKey")

$oSbPem = ObjCreate("Chilkat.StringBuilder")
Local $bCrlf = True
$oSbPem.AppendLine("-----BEGIN PUBLIC KEY-----",$bCrlf)
$oSbPem.AppendLine("MIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEA33TqqLR3eeUmDtHS89qF",$bCrlf)
$oSbPem.AppendLine("3p4MP7Wfqt2Zjj3lZjLjjCGDvwr9cJNlNDiuKboODgUiT4ZdPWbOiMAfDcDzlOxA",$bCrlf)
$oSbPem.AppendLine("04DDnEFGAf+kDQiNSe2ZtqC7bnIc8+KSG/qOGQIVaay4Ucr6ovDkykO5Hxn7OU7s",$bCrlf)
$oSbPem.AppendLine("Jp9TP9H0JH8zMQA6YzijYH9LsupTerrY3U6zyihVEDXXOv08vBHk50BMFJbE9iwF",$bCrlf)
$oSbPem.AppendLine("wnxCsU5+UZUZYw87Uu0n4LPFS9BT8tUIvAfnRXIEWCha3KbFWmdZQZlyrFw0buUE",$bCrlf)
$oSbPem.AppendLine("f0YN3/Q0auBkdbDR/ES2PbgKTJdkjc/rEeM0TxvOUf7HuUNOhrtAVEN1D5uuxE1W",$bCrlf)
$oSbPem.AppendLine("SwIDAQAB",$bCrlf)
$oSbPem.AppendLine("-----END PUBLIC KEY-----",$bCrlf)

; Load the public key object from the PEM. 
Local $bSuccess = $oPubkey.LoadFromString($oSbPem.GetAsString())
If ($bSuccess <> True) Then
    ConsoleWrite($oPubkey.LastErrorText & @CRLF)
    Exit
EndIf

Local $sOriginalData = "This is the original data to be SHA-256 hashed and RSA encrypted."

; First we SHA-256 hash the original data to get the hash in base64 format:
$oCrypt = ObjCreate("Chilkat.Crypt2")
$oCrypt.HashAlgorithm = "SHA-256"
$oCrypt.EncodingMode = "base64"
Local $sHashBase64 = $oCrypt.HashStringENC($sOriginalData)

; Setup RSA to use OAEP padding with SHA-1 for the mask function.
$oRsa = ObjCreate("Chilkat.Rsa")
$oRsa.OaepPadding = True
$oRsa.OaepHash = "SHA1"
$oRsa.ImportPublicKeyObj($oPubkey)
$oRsa.EncodingMode = "base64"

; Starting in v9.5.0.66, we can provide a binary encoding mode, such as "base64", "hex", "base64url", etc.
; for the Charset property.   The Charset property was previously limited to character encodings, such as
; "utf-8", "iso-8859-1", etc.  If a binary encoding is used, then the string passed in is decoded to the binary
; bytes as indicated.  (If an actual charset, such as "utf-8" is used, then the input string is converted to the
; byte representation of the charset, and then encrypted.)

; Given that a hash is composed of non-text binary bytes, we'll set the Charset property equal to "base64" 
; (because we have the base64 hash from above).
$oRsa.Charset = "base64"

; Note: The OAEP padding uses random bytes in the padding, and therefore each time encryption happens,
; even using the same data and key, the result will be different --  but still valid.  One should not expect
; to get the same output.
Local $bUsePrivateKey = False
Local $sEncryptedStr = $oRsa.EncryptStringENC($sHashBase64,$bUsePrivateKey)
If ($oRsa.LastMethodSuccess <> True) Then
    ConsoleWrite($oRsa.LastErrorText & @CRLF)
    Exit
EndIf

ConsoleWrite("Base64 RSA encrypted output: " & $sEncryptedStr & @CRLF)