Scribd
Cargar
3 vistas1 página

Función Hash Con Visual Basic NET

El artículo describe la implementación de una función en Visual Basic .NET que genera un resumen hash SHA-1 a partir de una cadena de texto. Se destaca la importancia de los resúmenes hash para la seguridad de las aplicaciones, ya que son cifrados unidireccionales que no permiten recuperar la cadena original. Se incluye el código de la función 'CreateHash' que convierte la cadena de entrada en un hash codificado en base64.

Cargado por

emmanuel obando
Derechos de autor
© All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como DOCX, PDF, TXT o lee en línea desde Scribd
3 vistas1 página

Función Hash Con Visual Basic NET

El artículo describe la implementación de una función en Visual Basic .NET que genera un resumen hash SHA-1 a partir de una cadena de texto. Se destaca la importancia de los resúmenes hash para la seguridad de las aplicaciones, ya que son cifrados unidireccionales que no permiten recuperar la cadena original. Se incluye el código de la función 'CreateHash' que convierte la cadena de entrada en un hash codificado en base64.

Cargado por

emmanuel obando
Derechos de autor
© All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como DOCX, PDF, TXT o lee en línea desde Scribd

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@[Link])

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 = [Link](inCadena)
Dim s1Service As New SHA1CryptoServiceProvider

'Crea el hash
bHash = [Link](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.

También podría gustarte