encriptacion MD5

[Jose_minglein2]

Hola,

estoy intentado hacer una cosa, en una base de datos, guardo un valor encriptado en md5 con PHP:

Código:

md5("valor")

y ahora intento comprobar si ese valor es igual al mismo encriptado mediante .net con md5 también:

Código:

  Dim md5 As System.Security.Cryptography.MD5 = System.Security.Cryptography.MD5CryptoServiceProvider.Create()
Convert.ToBase64String(md5.ComputeHash(System.Text.Encoding.Default.GetBytes("valor")))

¿por que no me da lo mismo?

[marlx]

Encontre hace un tiempo esta funcion en CSharp y la converti a VB

Código:

    Public Function ToMd5(ByVal sPass As String) As String
        Dim md5 As MD5 = New MD5CryptoServiceProvider
        Dim dataMd5() As Byte = md5.ComputeHash(Encoding.Default.GetBytes(sPass))
        Dim sbEnc As StringBuilder = New StringBuilder()
        Dim i As Integer
        For i = 0 To dataMd5.Length - 1
            sbEnc.AppendFormat("{0:x2}", dataMd5(i))
        Next
        Return sbEnc.ToString
    End Function

[Jose_minglein2]

Esa me ha venido que ni pintado!!!

Muchas gracias.