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"

' Pre-dimension digest array - do this each time

' 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]

[PREV: Example: Hash.BytesFromBytes ...]   [Contents]   [Index]   
   [NEXT: Example: Hash.HexFromBytes ...]

Copyright © 2001-23 D.I. Management Services Pty Ltd. All rights reserved. Generated 2023-05-20T13:01:10Z.