(Visual Basic 6.0) Calculate MD5 Hash of File (or SHA1, SHA256, and other hash algorithms)

Demonstrates how to calculate a hash for a file's contents.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

' This example assumes the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

Dim crypt As New ChilkatCrypt2

' Set the name of the hash algorithm.
' Other choices include "sha1", "sha256", "sha384", "sha512", "md2", "md5", and "haval". 
crypt.HashAlgorithm = "md5"

' EncodingMode specifies the encoding of the hash output.
' It may be "hex", "url", "base64", or "quoted-printable".
crypt.EncodingMode = "hex"

' Files of any type may be hashed -- it doesn't matter
' if the file is binary or text...
Dim hashStr As String
hashStr = crypt.HashFileENC("/temp/something.dat")
If (crypt.LastMethodSuccess <> 1) Then
    Debug.Print crypt.LastErrorText
    Exit Sub
End If

Debug.Print hashStr