changepassword.asp

网上选课系统

<!--#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 "../"
%>