一楼的回答算很好了.你要想对比,在输入时要输入多加一个密码框(我这里给你用变量:PWD0)用来输入原密码,在处理中,你这样用.
<%
pwd=md5(request.Form("pwd"))
pwd0=md5(request.Form("pwd0")) '这一行用来对比数据库中的原密码.
uid=request.Form("id")
m1=request.Form("name")
sql="select id from admin_biao where id="&uid&" and pwd='"&pwd0&"'"'这里的语句用来判断用户的原密码是否正确
set rs=conn.execute(sql)
if rs.eof and rs.bof then'发现没有返回数据密码不正确.
ErrorMessage = "原密码不正确!"
else
up="update admin_biao set name='"&m1&"' ,pwd='"&pwd&"' where id="&uid&""
conn.execute(up)
ErrorMessage = "修改成功!"
end if
response.write(" ")
%>
set t1 = conn.execute("select * from admin_biao where id="&uid&"")
if pwd = t1("pwd") then
conn.execute(up)
else
错误提示
end if