getpws3.asp

来自「设计考虑校园电子商务模式」· ASP 代码 · 共 22 行

<%
'****************************************************
' 多多校园                      Power by ddtaobao.com
' Email:[e-mail]               OICQ:136465584 
' Web: http://www.ddtaobao.com              作者:多多
' 校园、企业、医院、公司程序定做，系统开发，网站制作!
' Copyright (C) 2007 ddtaobao.com All Rights Reserved
'****************************************************
%><!--#include file="ddtaobao.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 [dd_user] 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()
%>