Generar SHA512
Hola aqui te dejo la funcion para generar el codificado en SHA512 en vb.net
1 2 3 4 5 6 7 8 9 10 11 12 |
Function generarSHA512(ByVal sCadena As String) As String ' Objeto de codificación Dim ueCodigo As New UnicodeEncoding() ' Objeto para instanciar las codificación Dim SHA As New SHA512Managed</code> ' Calcula el valor hash de la cadena recibida Dim bHash() As Byte = SHA.ComputeHash(ueCodigo.GetBytes(sCadena)) ' Convierte el valor anterior en cadena y lo devuelve Return Convert.ToBase64String(bHash) End Function |
Espero que te sirva un Saludo