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.