AES String Encryption w/ Base64 Encoding

Download: Chilkat .NET Assemblies

VB.NET example code demonstrating how to 128-bit AES encrypt a string and return the encrypted data as a base64 encoded string. Also shows how to do the decryption.

        Dim crypt2 As New Chilkat.Crypt2()
        crypt2.UnlockComponent("anything for 30-day trial")

        crypt2.CryptAlgorithm = "aes"
        crypt2.EncodingMode = "base64"
        crypt2.KeyLength = 128
        crypt2.SecretKey = crypt2.GenerateSecretKey("myPassword")

        Dim encrypted As String
        encrypted = crypt2.EncryptStringENC("This string will be 128-bit AES encrypted and returned in base64 format")
        MessageBox.Show(encrypted)

        Dim decrypted As String
        decrypted = crypt2.DecryptStringENC(encrypted)
        MessageBox.Show(decrypted)