AutoIt

UN/EDIFACT Syntax Level A Encoding/Decoding

See more Encryption Examples

Demonstrates the new "eda" encoding that can be used throughout Chilkat starting in v9.5.0.65. AutoIt

;  Note: Requires Chilkat v9.5.0.65 or greater.

$oSb = ObjCreate("Chilkat.StringBuilder")
$oSb.Append("The 5 men of 223rd St")
ConsoleWrite($oSb.GetAsString() & @CRLF)

;  Encode the utf-8 byte representation of the string in the 
;  UN/EDIFACT syntax level A character set.
$oSb.Encode("eda","utf-8")
ConsoleWrite($oSb.GetAsString() & @CRLF)

;  EDA Output should be: BTME027FCF6CFARFI94JT6.)F(14KJ2U

;  Decode back to the original string.
$oSb.Decode("eda","utf-8")
ConsoleWrite($oSb.GetAsString() & @CRLF)
ConsoleWrite("----" & @CRLF)

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

;  The "eda" encoding can be used anywhere within Chilkat.
;  For example, with the Crypt2 API
$oCrypt = ObjCreate("Chilkat.Crypt2")
$oCrypt.CryptAlgorithm = "aes"
$oCrypt.CipherMode = "cbc"
$oCrypt.KeyLength = 256
$oCrypt.EncodingMode = "eda"

Local $sIvHex = "000102030405060708090A0B0C0D0E0F"
$oCrypt.SetEncodedIV $sIvHex,"hex"
Local $sKeyHex = "000102030405060708090A0B0C0D0E0F101112131415161718191A1B1C1D1E1F"
$oCrypt.SetEncodedKey $sKeyHex,"hex"

Local $sEncStr = $oCrypt.EncryptStringENC("The quick brown fox jumps over the lazy dog.")
;  The output is UN/EDIFACT syntax level A 
ConsoleWrite($sEncStr & @CRLF)

;  Now decrypt:
Local $sDecStr = $oCrypt.DecryptStringENC($sEncStr)
ConsoleWrite($sDecStr & @CRLF)