renpassword.asp
来自「创建和运行动态、交互的Web服务器应用程序」· ASP 代码 · 共 128 行
ASP
128 行
<!--#include file="conn.asp"-->
<%if session("admin")="" then
response.Write "<script language='javascript'>alert('网络超时或您还没有登陆！');window.location.reload('login.asp')</script>"
response.End
end if
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../images/css2.css" rel="stylesheet" type="text/css">
<script LANGUAGE="javascript">
<!--
function checkspace(checkstr) {
var str = '';
for(i = 0; i < checkstr.length; i++) {
str = str + ' ';
}
return (str == checkstr);
}
function check()
{
if(checkspace(document.renpassword.password.value)) {
document.renpassword.password.focus();
alert("原密码不能为空！");
return false;
}
if(checkspace(document.renpassword.password1.value)) {
document.renpassword.password1.focus();
alert("新密码不能为空！");
return false;
}
if(checkspace(document.renpassword.password2.value)) {
document.renpassword.password2.focus();
alert("确认密码不能为空！");
return false;
}
if(document.renpassword.password1.value != document.renpassword.password2.value) {
document.renpassword.password1.focus();
document.renpassword.password1.value = '';
document.renpassword.password2.value = '';
alert("新密码和确认密码不相同，请重新输入");
return false;
}
document.admininfo.submit();
}
//-->
</script>
</head>
<body>
<%if request.QueryString("action")="save" then
set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from shop_admin where admin='"&session("admin")&"'",conn,1,3
if md5(trim(request("password")))<>rs("password") then
response.Write "<script language=javascript>alert('原密码错误，请返回重新输入');window.location.reload('renpassword.asp')</script>"
response.End
else
rs("password")=trim(request("password2"))
rs.Update
rs.Close
set rs=nothing
session("admin")=""
session("flag")=""
response.Write "<script language=javascript>alert('更改成功，请用新密码重新登陆！');window.location.reload('login.asp')</script>"
end if
response.End
end if%>
<table width="90%" height="450" border="0" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="#ece9d8"><br>
<table width="50%" border="0" align=center cellpadding="0" cellspacing="0">
<tr><td>
<table width=77 border="0" cellpadding="0" cellspacing="0">
<tr valign=bottom>
<td background=images/get_img.gif width=77 height=26><P style='PADDING-LEFT: 7px'><div align="center"><font color=#ffffff>修改密码</font></div></td>
</tr>
</table>
<table width="100%" border="1" align=center cellspacing="0" cellpadding="0" bordercolordark="#ffffff" bordercolorlight="#666666">
<tr><td colspan=2 valign=top>
<table width="100%" border="1" align="center" cellpadding="0" cellspacing="0" bgcolor="#ffffff">
<form name="renpassword" method="post" action="renpassword.asp?action=save">
<tr>
<td><div align="right"><font color=blue>当前用户：</font></div></td>
<td> <%=session("admin")%></td>
</tr>
<tr>
<td><div align="right">原密码： </div></td>
<td><input name="password" type="password" id="password" size="24"></td>
</tr>
<tr>
<td><div align="right">新密码： </div></td>
<td><input name="password1" type="password" id="password1" size="24"></td>
</tr>
<tr>
<td><div align="right">确认密码：</div></td>
<td><input name="password2" type="password" id="password2" size="24"></td>
</tr>
<tr bgcolor="#cccccc">
<td colspan="2"><div align="center"><input onClick="return check();" type="submit" name="Submit" class="bt5" value="确 定"></div></td>
</tr>
</form>
</table>
</tr>
</table>
</tr>
</table>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?