Encriptar

12/08/2004 - 21:11 por jose vargas | Informe spam
Hola a todos:
Saben como encriptar en .NET , solo deseo encriptar
palabras. Nombre de servidor, base de datos , etc.
 

Leer las respuestas

#1 Eduardo A. Morcillo [MS MVP VB]
13/08/2004 - 06:26 | Informe spam
jose vargas wrote:
Hola a todos:
Saben como encriptar en .NET , solo deseo encriptar
palabras. Nombre de servidor, base de datos , etc.



Utiliza las clases de System.Security.Cryptography. Por ejemplo:

Function EncryptString( _
ByVal text As String, _
ByVal password As String) As String

' Create the 3DES provider object
Dim tdes As New TripleDESCryptoServiceProvider

' Convert the string to a byte array
Dim data() As Byte = UTF8.GetBytes(text)

' Derive a key from the password
Dim iv() As Byte = {0, 0, 0, 0, 0, 0, 0, 0}
Dim keyb() As Byte = (New PasswordDeriveBytes(password,
iv).CryptDeriveKey("TripleDES", "MD5", tdes.KeySize, iv))

' Create an encryptor object
Dim transform As ICryptoTransform = tdes.CreateEncryptor(keyb, iv)

Return System.Convert.ToBase64String(transform.TransformFinalBlock(data,
0, data.Length))

End Function

La funcion para desencriptar te la dejo de tarea ;)

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo

Preguntas similares