VB.NET

Hash Binary Data (SHA256 and other hash algorithms)

Demonstrates how to hash binary bytes using SHA256, SHA384, SHA512, MD2, MD5, HAVAL, RIPEMD, etc. VB.NET

Dim success As Boolean = False

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

' Let's load a binary file to get the bytes..
Dim jpgData As New Chilkat.BinData
success = jpgData.LoadFile("qa_data/jpg/starfish.jpg")
If (success <> True) Then
    Debug.WriteLine("Failed to load file.")
    Exit Sub
End If

Dim jpgBytes() As Byte
jpgBytes = jpgData.GetBinary()

Dim crypt As New Chilkat.Crypt2

' Choose the hash algorithm.
' Can be  "sha1", "sha256", "sha384", "sha512", "md2", "md5", "haval", "ripemd128", "ripemd160","ripemd256", or "ripemd320".
crypt.HashAlgorithm = "sha256"

Dim hashBytes() As Byte
hashBytes = crypt.HashBytes(jpgBytes)

' Let's examine the hash as a hex string.
Dim sb As New Chilkat.StringBuilder
sb.AppendEncoded(hashBytes,"hex")
Debug.WriteLine("SHA256 hash = " & sb.GetAsString())

' We could alternatively hash the bytes and receive the hex result directly:
crypt.EncodingMode = "hex"
Dim hashHexStr As String = crypt.HashBytesENC(jpgBytes)
Debug.WriteLine("SHA256 hash = " & hashHexStr)