Compute File CRC

Calculate the CRC for a file in the filesystem.

Download Chilkat Zip ActiveX (includes objects for .zip, .gz, .bz2, and .Z)

Dim zipCrc As New ChilkatZipCrc
Dim crc As Long
crc = zipCrc.FileCrc("someFile.dat")
Dim hexStr As String
hexStr = zipCrc.ToHex(crc)
Text1.Text = Text1.Text & hexStr & vbCrLf