How to use .NET 3.5 class from Excel 2010 VBA

[PhilSwEngr]

Is there a way I can use System.Security.Cryptography from an Excel 2010 VBA module subroutine to calculate an MD5 checksum of a file? In C# I use the statement:

using System.Security.Cryptography;
…
MD5CryptoServiceProvider md5Generator = new MD5CryptoServiceProvider();

Since System.Security.Cryptography is available as part of .NET 3.5, I s/b able to use it from Excel VBA w/o having to register any DLLs, correct?

Any help is appreciated.

 

[Kyle123]

This works for me:

Public Function HashFile(fpath As String) As String
    
    Dim byt() As Byte, x As Long
    
    With CreateObject("adodb.stream")
        .Open
        .Type = 1
        .LoadFromFile fpath
        byt = CreateObject("System.Security.Cryptography.MD5CryptoServiceProvider").ComputeHash_2(.Read)
        .Close
    End With
    
    For x = LBound(byt) To UBound(byt)
        HashFile = HashFile & IIf(Len(Hex(byt(x))) > 1, Hex(byt(x)), "0" & Hex(byt(x)))
    Next x
    
    
    HashFile = LCase(HashFile)
    
    
End Function

 

[PhilSwEngr]

Kyle, you are the man! The code you posted produces checksums identical to those produced by my C# implementation for both text and binary files. Thanks!