Colaboraciones en el Guille

Función Hash con Visual Basic NET

[Implementación de una función de resumen hash]

 

Fecha: 26/Oct/2005 (24-10-05)
Autor: Luis Fernando Chavarriaga Cano (inherits002@yahoo.es)

 


En este artículo se explica la creación de una función que recibe un String y devuelve una cadena con el resumen hash SHA-1 correspondiente.

La validación usando resúmenes hash es una buena alternativa para la seguridad de cualquier aplicación.
 

Veamos el código de la función:

Function CreateHash(ByVal inCadena As String) As String

    Dim UE As New UnicodeEncoding
    Dim bHash As Byte()

    'Almacena la cadena ingresada en una matriz de bytes
    Dim bCadena() As Byte = UE.GetBytes(inCadena)
    Dim s1Service As New SHA1CryptoServiceProvider

    'Crea el hash
    bHash = s1Service.ComputeHash(bCadena)

    'Retorna como una cadena codificada en base64
    Dim Resumen As String
    Resumen = Convert.ToBase64String(bHash)

    Return Resumen

End Function

Los resumenes hash son cifrados unidireccionales porque es imposible obtener la cadena original a través del hash.

Por favor no olviden votar este artículo en PanoramaBox.

Gracias.


Espacios de nombres usados en el código de este artículo:

System.Security.Criptography
System.Text

 


Fichero con el código de ejemplo: inherits002_hash.zip - 1 KB


ir al índice principal del Guille