CryptoSys API examples VB6 to VB.NET

HASH_HexFromHex

Creates a message digest hash in hexadecimal format from data in a hexadecimal-encoded string.

VB6/VBA

Debug.Print "Testing HASH_HexFromHex ..."
Dim strDigest As String
Dim nRet As Long
Dim strData As String
strDigest = String(API_SHA1_CHARS, " ")
strData = "616263"
nRet = HASH_HexFromHex(strDigest, Len(strDigest), strData, API_HASH_SHA1)
Debug.Print strDigest

Output

Testing HASH_HexFromHex ...
a9993e364706816aba3e25717850c26c9cd0d89d

VB.NET

Console.WriteLine("Testing HASH_HexFromHex ...")
Dim strDigest As String
''Dim nRet As Integer
Dim strData As String
''strDigest = String(API_SHA1_CHARS, " ")
strData = "616263"
strDigest = Hash.HexFromHex(strData, HashAlgorithm.Sha1)
Console.WriteLine(strDigest)

[Contents]

[HOME]   [NEXT: MAC_Bytes...]

Copyright © 2009-20 D.I. Management Services Pty Ltd. All rights reserved.