(VBScript) MD5 Hash a String (such as a password string)
Demonstrates how to MD5 hash a string to get MD5 hash in hex encoded string representation. (The MD5 hash is 16 bytes, and therefore a hex encoded MD5 hash would be 32 chars.)
Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)
password = "myPassword"
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Crypt2")
set crypt = CreateObject("Chilkat.Crypt2")
crypt.HashAlgorithm = "md5"
crypt.EncodingMode = "hex"
md5Hex = crypt.HashStringENC(password)
outFile.WriteLine("MD5 hash (as a hex string) = " & md5Hex)
' The hex string will be uppercase. Your application
' can easily convert it to lowercase if desired via non-Chilkat means.
outFile.Close
|