Generar MD5 vb.net - Soulsmakers

GENERAR MD5

Hola aquí os dejo la función para generar un md5 vb.net

Espero que os sirva , Un Saludo

Imports System.Text
Imports System.Security.Cryptography

Function generarMD5(ByVal sCadena As String) As String
  
  Dim ueCodigo As New UnicodeEncoding()
 
  Dim Md5 As New MD5CryptoServiceProvider()

  Dim bHash() As Byte = Md5.ComputeHash(ueCodigo.GetBytes(sCadena))

  Return Convert.ToBase64String(bHash)
End Function

Imports System.Text

Imports System.Security.Cryptography

Function generarMD5(ByVal sCadena As String) As String

Dim ueCodigo As New UnicodeEncoding()

Dim Md5 As New MD5CryptoServiceProvider()

Dim bHash() As Byte = Md5.ComputeHash(ueCodigo.GetBytes(sCadena))

Return Convert.ToBase64String(bHash)

End Function

Deja un comentario Cancelar respuesta