admin_user_edit.asp
来自「ASP+Accesss数据库设备WEB报修」· ASP 代码 · 共 152 行
ASP
152 行
<%if session("pass")<>"ok" then
Response.Redirect "index.asp"
Response.End
end if
%>
<!--#include file =conn.asp-->
<!--#include file="ChkURL.asp"-->
<%
dim user_id
user_id=cint(request("user_id"))
if user_id<>"" and user_id="0" then
Response.Write "<script>alert('未指定参数');history.back()</script>"
response.end
else
dim rs_user
dim sql
dim user_name,password,zs_name
user_name=request("user_name")
zs_name=request("zs_name")
password=md5(trim(request("password")))
sql="select * from user_reg where user_id=" & user_id
Set rs_user = Server.CreateObject("ADODB.Recordset")
rs_user.open sql,conn,3,2
if rs_user.eof and rs_user.bof then
rs_user.close
set rs_user=nothing
Response.Write "<script>alert('指定的ID不存在！');history.back()</script>"
response.end
end if
end if
%>
<html>
<title>密码修改</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="style.css" type="text/css">
<script LANGUAGE="javascript">
<!--
function FrmAddLink_onsubmit() {
if (document.FrmAddLink.password.value=="")
{
alert("对不起，请您输入密码！")
document.FrmAddLink.password.focus()
return false
}
else if (document.FrmAddLink.password.value.length < 4)
{
alert("为了安全，您的密码应该长一点！")
document.FrmAddLink.password.focus()
return false
}
else if (document.FrmAddLink.password.value.length > 16)
{
alert("您的密码太长了吧！")
document.FrmAddLink.password.focus()
return false
}
else if (document.FrmAddLink.user_name.value==document.FrmAddLink.password.value)
{
alert("为了安全，用户名与密码不应该相同！")
document.FrmAddLink.password.focus()
return false
}
else if (document.FrmAddLink.password_two.value=="")
{
alert("对不起，请您输入验证密码！")
document.FrmAddLink.password_two.focus()
return false
}
else if (document.FrmAddLink.password_two.value !== document.FrmAddLink.password.value)
{
alert("对不起，您两次输入的密码不一致！")
document.FrmAddLink.password_two.focus()
return false
}
else if (document.FrmAddLink.zs_name.value=="")
{
alert("对不起，请输入真实姓名！")
document.FrmAddLink.zs_name.focus()
return false
}
}
//-->
</script>
</head>
<body>
<table cellpadding="2" cellspacing="1" border="0" width="100%" class="TableBorder" align=center>
<tr align="center">
<td height=30 colspan=2 class="TableTitle1"><b>用 户 资 料 修 改</b>
</tr>
<tr>
<td width="100" class="TableRow2" height=25><strong>管理快捷方式：</strong></td>
<td height="30" class="TableRow2"><a href="Admin_system.asp">网站信息设置</a> | <A href="admin_user_list.asp" target="main">用户列表</A> | <A href="admin_manager_list.asp" target="main">管理员列表</A></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="20"></td>
</tr>
</table>
<table width="600" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="600" align="center">
<form method="POST" name="FrmAddLink" LANGUAGE="javascript" action="admin_user_edit_save.asp?user_id=<%=user_id%>" onSubmit="return FrmAddLink_onsubmit()">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="TableBorder">
<tr>
<td height="30" colspan="2" align="center" class="TableTitle1">密码修改</td>
</tr>
<tr>
<td width="35%" height="30" align="center" class="TableRow2">登录名称：</td>
<td width="65%" height="14" class="TableRow2">
<input name="user_name" type="text" value="<%=rs_user("user_name")%>" size="18" onKeyUp="value=value.replace(/[\W]/g,'') "onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))" onKeyDown="if(event.keyCode==13)event.keyCode=9" readonly> <span class="style1">如不修改请不要改动</span></td>
</tr>
<tr>
<td width="35%" height="30" align="center" class="TableRow2">用户名称：</td>
<td width="65%" height="14" class="TableRow2">
<input name="zs_name" type="text" value="<%=rs_user("zs_name")%>" size="18" onKeyUp="value=value.replace(/[ -~]/g,'')" onKeyDown="if(event.keyCode==13)event.keyCode=9"> <span class="style1">如不修改请不要改动</span></td>
</tr>
<tr>
<td width="35%" height="30" align="center" class="TableRow2">用户密码：</td>
<td width="65%" height="30" class="TableRow2">
<input name="password" type="password" value="<%=rs_user("password")%>" size="18"> <span class="style1">如不修改请不要改动，不能少于4位</span></td>
</tr>
<tr>
<td width="35%" height="25" align="center" class="TableRow2">确认密码：</td>
<td width="65%" height="25" class="TableRow2">
<input name="password_two" type="password" value="<%=rs_user("password")%>" size="18"> <span class="style1">如不修改请不要改动</span></td></tr>
<tr>
<td width="35%" height="25" align="center" class="TableRow2">用户权限：</td>
<td height="25" class="TableRow2"><font color="#000099">
<select name="purview" size=1 class=wu id="purview">
<option <%if rs_user("purview")="1" then%> selected <%end if%> value="1">管理员</option>
<option <%if rs_user("purview")="0" then%> selected <%end if%> value="0">报修用户</option>
</select>
</font></td>
</tr>
</table>
<br>
<input type="reset" value="返 回" onClick="javascript:history.go(-1)">
<input name="B1" type="submit" value="提 交">
<input name="B2" type="reset" value="重 写">
</form></td>
</tr>
</table>
<!--#include file="copyright.asp" -->
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?