Discussion :

[danho]

Bonjour,

j'aimerais savoir comment utiliser la fonction de hachage de mot de passe en vb2008.


Merci

[Nathanael Marchand]

Quelle fonction de hashage? MD5? SHA0? SHA1? SHA256? y'en a un paquet

[GuruuMeditation]

Il faut juste éviter d'utiliser le GetHashCode() de base, car, entre autres, les résultats sont différents en 32 et 64 bits

[franticfranz]

Bonjour,

Ma proposition :

Ne pas oublier le :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Imports System.Security.Cryptography

Fonction :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
    Private Function GenerateHash(ByVal SourceText As String) As String
        Dim Md5 As New MD5CryptoServiceProvider()
 
        Dim bytesToHash() As Byte = System.Text.Encoding.ASCII.GetBytes(SourceText)
        bytesToHash = Md5.ComputeHash(bytesToHash)
        Dim strResult As String = ""
        For Each b As Byte In bytesToHash
            strResult += b.ToString("x2")
        Next b
        Return strResult
    End Function

Cette fonction renvoie le MD5 de la chaîne de caractère entrée (SourceText).