简单支持中文的MD5版函数

调用.net的库来实现，这样就可以完美支持中文，与.net等加密结果保持一致了。
记得应用程序池启用.NET CLR 托管模式，如下图：

1. <%
   
2. 
   
3.     Function MD5(text)
   
4.         With CreateObject("MSXML.DOMDocument").createElement("a")
   
5.             .dataType = "bin.hex"
   
6.             .nodeTypedvalue = CreateObject("System.Security.Cryptography.MD5CryptoServiceProvider").ComputeHash_2(CreateObject("System.Text.UTF8Encoding").GetBytes_4(text))
   
7.             MD5 = .text
   
8.         End With
   
9.     End Function
   
10.        
    
11.        
    
12. 
    
13. Response.Write MD5("天天ASP家园")
    
14. 
    
15. %>

复制代码

输出结果：

每天都来学习新知识！