Aurigma HashGenerator is small ActiveX component for SHA1, MD2, and MD5 hash computing.
Here is code snippet how to use it:
Code:<%
Dim objHashGenerator
Set objHashGenerator = Server.CreateObject("Aurigma.HashGenerator")
Dim strFileName
strFileName = Server.MapPath("IMG_0001.jpg")
Dim strSHA
strSHA = objHashGenerator.GetShaFromFile(strFileName)
Response.Write strSHA
Dim strMD2
strMD2 = objHashGenerator.GetMD2FromFile(strFileName)
Response.Write strMD2
Dim strMD5
strMD5 = objHashGenerator.GetMD5FromFile(strFileName)
Response.Write strMD5
%>
The component is free and is released under BSD license.
You can find binaries and source code in attachments.
Note, you should register HashGenerator component from command line using
regsvr32 utiltiy:
Code:regsvr32 HashGenerator.dll
File Attachment(s):
HashGenerator.zip (19kb) downloaded 459 time(s).
HashGeneratorSrc.zip (30kb) downloaded 391 time(s).
Best regards,
Fedor Skvortsov