Chilkat • HOME • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi DLL • Go • Java • Node.js • Objective-C • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(PureBasic) AES Encryption ECB Mode with PKCS7 PaddingDuplicates the following C# code: public static byte[] DecryptBySymmetricKey(string encryptedText, byte[] key) { string keyAsBase64 = Convert.ToBase64String(key); byte[] dataToDecrypt = Convert.FromBase64String(encryptedText); var keyBytes = key; AesManaged tdes = new AesManaged(); tdes.KeySize = 256; tdes.BlockSize = 128; tdes.Key = keyBytes; tdes.Mode = CipherMode.ECB; tdes.Padding = PaddingMode.PKCS7; ICryptoTransform decrypt__1 = tdes.CreateDecryptor(); byte[] deCipher = decrypt__1.TransformFinalBlock(dataToDecrypt, 0, dataToDecrypt.Length); tdes.Clear(); string EK_result = Convert.ToBase64String(deCipher); return EK_result; }
IncludeFile "CkCrypt2.pb" Procedure ChilkatExample() ; This example requires the Chilkat API to have been previously unlocked. ; See Global Unlock Sample for sample code. crypt.i = CkCrypt2::ckCreate() If crypt.i = 0 Debug "Failed to create object." ProcedureReturn EndIf ; In the C# code above that is to be duplicated here, use the base64 encoded key. keyAsBase64.s = "..." encryptedBytesAsBase64.s = "...." CkCrypt2::setCkKeyLength(crypt, 256) CkCrypt2::setCkCryptAlgorithm(crypt, "AES") CkCrypt2::setCkCipherMode(crypt, "ecb") CkCrypt2::setCkPaddingScheme(crypt, 0) CkCrypt2::ckSetEncodedKey(crypt,keyAsBase64,"base64") CkCrypt2::setCkEncodingMode(crypt, "base64") ; Pass the base64 representation of the encrypted data. ; (The EncodingMode indicates you are passing base64.) EK_result.s = CkCrypt2::ckDecryptStringENC(crypt,encryptedBytesAsBase64) Debug EK_result CkCrypt2::ckDispose(crypt) ProcedureReturn EndProcedure |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.