MD5 using ASP

Source Code

Usage

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

<HTML>


<%
Dim sDigest

Response.Write("<FONT FACE='COURIER' SIZE=3>")

sDigest = md5("abc")
Response.Write("MD5(""abc"")<BR>")
Response.Write("Expected: 900150983cd24fb0d6963f7d28e17f72<BR>")
Response.Write("Actual: " & sDigest & "<BR><BR>")

sDigest = md5("message digest")
Response.Write("MD5(""message digest"")<BR>")
Response.Write("Expected: f96b697d7cb7938d525a2f31aaf161d0<BR>")
Response.Write("Actual: " & sDigest & "<BR><BR>")

Response.Write("</FONT>")
%>
</HTML>

Output

MD5("abc")
Expected: 900150983cd24fb0d6963f7d28e17f72
Actual:   900150983cd24fb0d6963f7d28e17f72

MD5("message digest")
Expected: f96b697d7cb7938d525a2f31aaf161d0
Actual:   f96b697d7cb7938d525a2f31aaf161d0