XL 2016 comment crypter un mot de pass a l'aide d'une fonction de hachage SHA256

KOKI025KOKI

XLDnaute Nouveau
Bonjour a tous , C'est possible je veux cryptée ce mot de pass la a l'aide d'une fonction de hachage SHA256

Password : karim

Voila la fonction :

Private Function SHA256(ByVal hach As String) As String
Dim ObjImplSerCry As New Security.Cryptography.SHA256CryptoServiceProvider
Dim ByteString() As Byte = System.Text.Encoding.ASCII.GetBytes(hach)
ByteString = ObjImplSerCry.ComputeHash(ByteString)
Dim finalString As String = Nothing
For Each bt As Byte In ByteString
finalString &= bt.ToString()
Next
Return finalString
End Function

Merci
 

Hasco

XLDnaute Barbatruc
Repose en paix
Bonjour,

Vous trouverez dans le lien ci-dessous un module tout écrit avec plusieurs fonctions de cryptage.
N'oubliez pas dans votre utilisation de mentionner la source du module.

Cordialement
 

Discussions similaires

Statistiques des forums

Discussions
311 725
Messages
2 081 943
Membres
101 849
dernier inscrit
florentMIG