Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Visual FoxPro) AES OFB Output Feedback Mode EncryptionDemonstrates how to encrypt using AES OFB (Output Feedback) mode.
LOCAL loCrypt LOCAL lcIvHex LOCAL lcKeyHex LOCAL lcEncStr LOCAL loDecrypt LOCAL lcDecStr * This example requires the Chilkat API to have been previously unlocked. * See Global Unlock Sample for sample code. loCrypt = CreateObject('Chilkat_9_5_0.Crypt2') loCrypt.CryptAlgorithm = "aes" * Set the cipher mode to Output Feedback loCrypt.CipherMode = "ofb" loCrypt.KeyLength = 256 * EncodingMode specifies the encoding of the output for * encryption, and the input for decryption. * It may be "hex", "url", "base64", "quoted-printable", or many other choices. loCrypt.EncodingMode = "hex" lcIvHex = "000102030405060708090A0B0C0D0E0F" loCrypt.SetEncodedIV(lcIvHex,"hex") * The secret key must equal the size of the key. For * 256-bit encryption, the binary secret key is 32 bytes. lcKeyHex = "603deb1015ca71be2b73aef0857d77811f352c073b6108d72d9810a30914dff4" loCrypt.SetEncodedKey(lcKeyHex,"hex") * Encrypt a string... lcEncStr = loCrypt.EncryptStringENC("Popular opinions, on subjects not palpable to sense, are often true, but seldom or never the whole truth. -- John Stuart Mill") ? lcEncStr loDecrypt = CreateObject('Chilkat_9_5_0.Crypt2') loDecrypt.CryptAlgorithm = "aes" loDecrypt.CipherMode = "ofb" loDecrypt.KeyLength = 256 loDecrypt.EncodingMode = "hex" loDecrypt.SetEncodedIV(lcIvHex,"hex") loDecrypt.SetEncodedKey(lcKeyHex,"hex") * Now decrypt: lcDecStr = loDecrypt.DecryptStringENC(lcEncStr) ? lcDecStr RELEASE loCrypt RELEASE loDecrypt |
© 2000-2023 Chilkat Software, Inc. All Rights Reserved.