Salut à tous

grâce à ce post : http://www.developpez.net/forums/d48...tage-passe-md5 j'ai pu implémenter dans mon application une fonction de cryptage de mes mots de passes en MD5 afin qu'ils ne soient pas stocké en clair dans ma BDD. Ça a l'air de bien fonctionner. Ce qui donne :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
    Public Function Crypte_md5(ByVal chaine As String) As String
        Dim tab_byte() As Byte
        tab_byte = System.Text.Encoding.ASCII.GetBytes(chaine)
        Dim md5 As New Security.Cryptography.MD5CryptoServiceProvider()
        tab_byte = md5.ComputeHash(tab_byte)
        Dim sb As New System.Text.StringBuilder
        Dim resultat As String
        For i = 0 To (tab_byte.Length) - 1
            sb.AppendFormat("{0:X2}", tab_byte(i))
        Next i
        resultat = sb.ToString.ToLower()
        Return resultat
    End Function
Maintenant ce que j'aimerai faire c'est la fonction inverse, pour décrypter du MD5 :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
    Public Function Decrypte_md5(ByVal chaine As String) As String
       ...
    End Function
Si quelqu'un était capable de m'aider .... Merci d'avance !