---------------------------------------------------------------------------------
The following code converts the 16-hexadecimal hashkey to a 32-character one:
Code:
txtUSERPWD_hash = HashString(TextLine)
For i = 1 To 16
c = Asc(Mid(txtUSERPWD_hash, i, 1))
strHash = strHash + Hex(c)
Next i
My VBA MD5 function returns 16 characters instead of 32?
hi there,
I found this code on your forum for which I am glad because I can use it pretty well IF there's a way to alter it and get a 32-character hashcode instead of 16! Anybody knows what's wrong here?
Thnx
------------------------------------------------------------------------------------------------------------
Working Code:
Code:
Private Declare Function CryptAcquireContext Lib "advapi32.dll"
Leave a comment: