How to implement RC2 algorithm in VB.NET?

Question

How to implement RC2 algorithm in VB.NET?please provide the sample code in VB.NET

Muralidharan Deenathayalan · Answer

Please find the attached sample, which implemented in windows application.

Muralidharan Deenathayalan · Answer

If you commented out the Response.Write, then you can use the same for windows application.

Shalini Juneja · Answer

please provide code for windows application

Muralidharan Deenathayalan · Answer

For more example, please refer the link http://www.java2s.com/Code/VB/File-Directory/UseDESRC2RijndaelTripleDEStodecryptandEncryptfiles.htm

Muralidharan Deenathayalan · Answer

Private Function rc2Encryption() Dim plainText As String = "This is a secret for RC2" Response.Write("plainText: " + plainText + " ") Dim buffer() As Byte = ASCIIEncoding.ASCII.GetBytes(plainText) Dim rc2 As New RC2CryptoServiceProvider rc2.GenerateKey() rc2.GenerateIV() Dim encryptedString As String = _ Convert.ToBase64String( _ rc2.CreateEncryptor().TransformFinalBlock( _ buffer, 0, buffer.Length)) Response.Write("encryptedString: " + encryptedString + " ") buffer = Convert.FromBase64String(encryptedString) Dim decryptedString As String = _ ASCIIEncoding.ASCII.GetString( _ rc2.CreateDecryptor().TransformFinalBlock( _ buffer, 0, buffer.Length)) Response.Write("Decrypted string: " + decryptedString + " ") End Function Hope this helps you.

How to implement RC2 algorithm in VB.NET?

Answers (5)