CryptoSys API Library Manual

Example: Hash.BytesFromFile  Hash.HexFromTextFile 

[VB6 equivalent: HASH_File]

Dim abDigest() As Byte
Dim sFileName As String
Dim strDigest 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
' [VB.NET] Only option in v4.2 for a "text" file is to use HexFromTextFile
strDigest = Hash.HexFromTextFile(sFileName, HashAlgorithm.Sha1)
Console.WriteLine(strDigest.Length & " " & strDigest)

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

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

See Also:
Hash.BytesFromFile Method

[Contents] [Index]

[HOME]   [NEXT: Example: Hash.HexFromBytes ...]

Copyright © 2001-11 D.I. Management Services Pty Ltd. All rights reserved.