Example: Hash.BytesFromFile  Hash.File  Hash.HexFromTextFile 

[VB6 equivalent: HASH_File]

Dim abDigest() As Byte
Dim sFileName As String

' File to be hashed contains a total of 13 bytes: "hello world" plus CR-LF
' 68 65 6c 6c 6f 20 77 6f 72 6c 64 0d 0a   hello world..

sFileName = "hello.txt"

' Create default hash (SHA1) in binary mode
abDigest = Hash.BytesFromFile(sFileName, HashAlgorithm.Sha1)
Console.WriteLine(abDigest.Length & " " & Cnv.ToHex(abDigest))

' Use SHA1 in "text" mode [FUDGE]
abDigest = Cnv.FromHex(Hash.HexFromTextFile(sFileName, HashAlgorithm.Sha1))
Console.WriteLine(abDigest.Length & " " & Cnv.ToHex(abDigest))

' Use MD5
abDigest = Hash.BytesFromFile(sFileName, HashAlgorithm.Md5)
Console.WriteLine(abDigest.Length & " " & Cnv.ToHex(abDigest))

' Use MD5 in "text" mode
abDigest = Cnv.FromHex(Hash.HexFromTextFile(sFileName, HashAlgorithm.Md5))
Console.WriteLine(abDigest.Length & " " & Cnv.ToHex(abDigest))

See Also:
Hash.BytesFromFile Method

[Contents] [Index]