Creates an MD5 message digest in hexadecimal format from a message of String type.
VB6/VBA
Debug.Print "Testing MD5_StringHexHash ..." Dim nRet As Long Dim strDigest As String ' Set strDigest to be 32 chars strDigest = String(32, " ") nRet = MD5_StringHexHash(strDigest, "abc") Debug.Print strDigest nRet = MD5_StringHexHash(strDigest, _ "abcdefghijklmnopqrstuvwxyz") Debug.Print strDigest
Output
Testing MD5_StringHexHash ... 900150983cd24fb0d6963f7d28e17f72 c3fcd3d76192e4007dfb496cca67e13b
VB.NET
Console.WriteLine("Testing MD5_StringHexHash ...") ''Dim nRet As Integer Dim strDigest As String ' Set strDigest to be 32 chars ''strDigest = String(32, " ") strDigest = Md5.HexHash("abc") Console.WriteLine(strDigest) strDigest = Md5.HexHash( _ "abcdefghijklmnopqrstuvwxyz") Console.WriteLine(strDigest)
[Contents]