changepassword.asp

来自「一个学生选棵系统的毕业论文」· ASP 代码 · 共 17 行

<!--#include file="../include/keepHouse.asp"-->
<%
call insureID()
dim ChangePwd,CheckPwd
ChangePwd=trim(request("ChangePwd"))
CheckPwd=trim(request("CheckPwd"))
USER_NAME=Session("USER_NAME")
if ChangePwd<>CheckPwd or ChangePwd="" or USER_NAME="" then
	call trigErr()
end if
call ReplacePrime(ChangePwd)
sql="update UserInfo set PASSWORD='"&ChangePwd&"' where USER_NAME='"&USER_NAME&"'"
call openDB()
conn.execute(sql)
call closeDB()
response.Redirect "../"
%>