📄 updatepw.asp

📁 《动态网页设计基础教程》,胡杰,科学出版社

💻 ASP

字号:


<!-- #include file="adoconn.asp" -->
<%
Session("uid")=request.form("T1")
Oldpwd=left(request.form("T2"),6)
Newpwd1=left(request.form("T3"),6)
Newpwd2=left(request.form("T4"),6)

if Newpwd1=Newpwd2 then
   if Session("Kind")="管理员" then
      sqlstr="Update operators set DbaPW = '" & Newpwd1 & "' Where DbaPW='" & Oldpwd & "' AND DbaCode='" & session("uid") & "'"
   elseif Session("Kind")="教师" then
      sqlstr="Update Teachers set TPW = '" & Newpwd1 & "' Where TPW='" & Oldpwd & "' AND Tid='" & Session("uid") & "'" 
   else
      sqlstr="Update Students set sPW = '" & Newpwd1 & "' Where sPW='" & Oldpwd & "' AND Sno='" & Session("uid") & "'" 
   End if
   if UpdatePWD(newpwd1,newpwd2,sqlstr)= True then
      response.write ("("&Session("uid")&")" & session("kind") & "新口令修改完成!")
   else
      response.write "原口令有误,请重新输入新口令!"
   end if  
else
   response.write "新口令有误,请重新输入新口令!"
end if
%>
<html>
<body>
&nbsp;&nbsp;&nbsp; <a href="javascript:history.back(1)">返回</a>     
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -