pass_save.asp

财务预算管理 财务支出

<!--#include file="sysconfig.asp"-->
<!--#include file="inc/md5.asp"-->
<%
password=replace(trim(Request("pwd1")),"'","")
if password<>"" then
password=md5(password)
set rs=server.createobject("adodb.recordset")
sqltext="select * from Admin where Id=" & request.querystring("uid")
rs.open sqltext,conn,3,3

'更新用户密码到数据库
rs("PassWord")=password
rs.update
rs.close
conn.close
else
end if
response.redirect "user.asp"
%>