📄 changpwd.asp
字号:
<%@ Language=VBScript %>
<%if not session("user_session_id")=Session.SessionID then%>
<SCRIPT LANGUAGE=javascript>
parent.window.location.href="default.asp"
</SCRIPT>
<%end if%>
<%if Request.Form("hid")="" then%>
<html>
<head>
</script>
<title>校友录-密码修改</title>
<LINK href="inc/css.css" type=text/css rel=stylesheet>
<style TYPE="text/css">
<!--
.popcomments
{
position : absolute; width:130;
visibility : hidden;
border: 1 solid #000001
}
.in
{
BORDER-RIGHT: rgb(127,127,127) 1px solid;
BORDER-TOP: rgb(127,127,127) 1px solid;
FONT-SIZE: 9pt;
BORDER-LEFT: rgb(127,127,127) 1px solid;
BORDER-BOTTOM: rgb(127,127,127) 1px solid;
BACKGROUND-COLOR: #ffffff
}
//-->
</style>
<HTML>
<head>
<title>同学录密码修改</title>
</head>
<script language="javascript">
function check(){
if (document.form1.pwd1.value!=document.form1.pwd2.value){
alert("两次输入的密码不一致\n请重填!");
document.form1.pwd1.value=""
document.form1.oldpassword.value=""
document.form1.pwd2.value=""
document.form1.oldpassword.focus();
return false;}
if(document.form1.pwd1.value==""){
alert("密码不能为空!");
document.form1.pwd1.value=""
document.form1.pwd2.value=""
document.form1.pwd1.focus();
return false;}
document.form1.submit()
}
</script>
</HEAD>
<BODY >
<form name="form1" method="post" action="changpwd.asp">
<table border="0" align=center>
<tr>
<td >旧密码:</td>
<td >
<input type="password" name="oldpassword" class=in>
</td>
</tr>
<tr>
<td >新密码:</td>
<td >
<input type="password" name="pwd1" class=in>
</td>
</tr>
<tr>
<td >确认密码:</td>
<td width="10">
<input type="password" name="pwd2" class=in>
</td>
</tr>
<tr align=center>
<td colspan=2><br>
<input type="hidden" name="ecid" value=<%=session("ecid")%>>
<input type="hidden" name="hid" value="ok">
<input type=button value="提交" name="submit1"
onclick="javascript:check()" class=in>
<input type="reset" value="重填" class=in>
</td></tr>
</table>
</form>
</BODY>
</HTML>
<%
else
ecid=Request.Form ("ecid")
strsql="select password from ec where studentid='"&ecid&"'"
set rst=Server.CreateObject ("ADODB.Recordset")
rst.Open strsql,session("cn"),1,3
iF not rst.EOF Then
rst.MoveFirst
End IF
IF Trim(Request.Form ("oldpassword"))<>rst("password") then
%>
<SCRIPT LANGUAGE=javascript>
<!--
alert('密码错误!')
history.back()
//-->
</SCRIPT>
<%
Response.End
End IF
rst("password")=Trim(Request.Form ("pwd1"))
rst.Update %>
<SCRIPT LANGUAGE=javascript>
<!--
alert('密码更改成功!新密码是<%=Trim(Request.Form ("pwd1"))%>')
window.close ()
//-->
</SCRIPT>
<%End IF%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -