MD5加密？？？

[yangy66]

代码如下：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../Connections/JuXing_WEB_Data.asp" -->
<!--#include file="INC/MD5.asp" -->
<%

if(request.form("admin_user") <> "") then Command1__user1 = request.form("admin_user")

if(request.form("admin_pass") <> "") then Command1__pass1 = request.form("admin_pass")

if(request.form("admin_name") <> "") then Command1__name1 = request.form("admin_name")

if(request.form("admin_email") <> "") then Command1__email1 = request.form("admin_email")

%>
<%

set Command1 = Server.CreateObject("ADODB.Command")
Command1.ActiveConnection = MM_JuXing_WEB_Data_STRING
Command1.CommandText = "INSERT INTO dbo.JuXing_Admin (Admin_user, Admin_Pass, Admin_Name, Admin_Email) VALUES (" + Replace(Command1__user1, "'", "''") + "," + Replace(Command1__pass1, "'", "''") + "," + Replace(Command1__name1, "'", "''") + "," + Replace(Command1__email1, "'", "''") + ") "
Command1.CommandType = 1
Command1.CommandTimeout = 0
Command1.Prepared = true
Command1.Execute()

%>
请问md5（）这个函数应该加在什么地方？谢谢

[ahhisoft]

用()包含你要加密的字符串或变量.

[yangy66]

这个我知道，，，我加成了这样 + md5(Replace(Command1__pass1, "'", "''"),16) +可怎么加都不对啊。后面的,16是MD5（）的参数（MD5.asp是我从动网偷来的:P）。要是我把上面的插入代码换成
Command1.CommandText = "INSERT INTO dbo.JuXing_Admin (Admin_user, Admin_Pass, Admin_Name, Admin_Email) VALUES ('"&Command1__user1&"','"&md5(Command1__pass1,16)&"','"&Command1__name1&"','"&Command1__email1&"') "
这样写就没有问题，可DW里的commend命令就。。。。。。。大家在帮忙看看了！谢谢。

[BILLSJONE]

是你语法写错，+ "," +密码是字符没有单引号肯定错

[yangy66]

哈哈，搞定了，原来得这样写。谢谢！
+ "'"&md5(Replace(Command1__pass1, "'", "''"),16)&"'" +