使用.net库进行MD5加密非常简便,直接上代码,支持中英文。
<%@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("中国")%>