在ASP中使用.net库进行MD5加密

还记得吗？ASP最常见的MD5函数，一个页面四处调用，网上流传的很多版本要么只能加密非中文字符，要么加密不准确。在WIN系统上，使用.net库大概是个既简单又好的方法。

直接贴代码：

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
Function md5(text)
	With CreateObject("MSXML.DOMDocument").createElement("a")
		.dataType = "bin.hex"
		.nodeTypedvalue = CreateObject("System.Security.Cryptography.MD5CryptoServiceProvider").ComputeHash_2(CreateObject("System.Text.UTF8Encoding").GetBytes_4(text))
		md5 = .text
	End With
End Function
%>
<%=md5("中国")%>

试试吧。