Visual Basic 6.0

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

See more Encryption Examples

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

' 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