getpws3.asp

来自「校园二手交易系统,具有完备的后台操作以及应用功能!」· ASP 代码 · 共 14 行

<!--#include file="Conn.asp"-->
<!--#include file="Inc/md5.asp"-->
<!--#include file="inc/msgbox.asp"-->
<%
dim user_password,strsql,rs
user_password=md5(request.Form("user_password"),16)
set rs=server.CreateObject("adodb.recordset")
strsql="select * from [dduser] where user_name='"& session("user_name") &"'"
rs.open strsql,conn,1,3
rs("user_password")=user_password
rs.update
call msgbox("密码修改完成","GoUrl","user_login.asp")
response.End()
%>