Posted on: 1/9/2014 9:32:43 AM | Views : 687

Hello,
Please Help Me , How I Can Use AES (Encrypt & Decrypt) in this code without base64 encoding but with another encoding (ex. UTF, integer, or another).
this is my code,
Protected Sub Encrypt(sender As Object, e As EventArgs) lblEncryptedText.Text = Me.Encrypt(txtOriginalText.Text.Trim()) End Sub Private Function Encrypt(clearText As String) As String Dim EncryptionKey As String = "MAKV2SPBNI99212" Dim clearBytes As Byte() = Encoding.Unicode.GetBytes(clearText) Using encryptor As Aes = Aes.Create() Dim pdb As New Rfc2898DeriveBytes(EncryptionKey, New Byte() {&H49, &H76, &H61, &H6E, &H20, &H4D, _ &H65, &H64, &H76, &H65, &H64, &H65, _ &H76}) encryptor.Key = pdb.GetBytes(32) e ...

Go to the complete details ...