Creates a message digest hash in hexadecimal format from byte (or string) data.
VB6/VBA
Debug.Print "Testing HASH_HexFromBytes ..." Dim nRet As Long Dim sDigest As String Dim strMessage As String strMessage = "abc" ' Pre-dimension digest string sDigest = String(40, " ") ' Create default hash (SHA1) nRet = HASH_HexFromString(sDigest, Len(sDigest), strMessage, Len(strMessage), 0) Debug.Print nRet, sDigest
Output
Testing HASH_HexFromBytes ... 40 a9993e364706816aba3e25717850c26c9cd0d89d
VB.NET
Console.WriteLine("Testing HASH_HexFromBytes ...")
''Dim nRet As Integer
Dim sDigest As String
Dim strMessage As String
strMessage = "abc"
' Create default hash (SHA1)
sDigest = Hash.HexFromString(strMessage, HashAlgorithm.Sha1)
Console.WriteLine(sDigest.Length & " " & sDigest)
[Contents]