📄 adminedit.asp
字号:
<!--#include File="../conndb.asp"-->
<!--#include file="isAdmin.asp"-->
<html>
<head>
<link rel="stylesheet" href="../style.css">
<title>修改管理员信息</title>
</head>
<script Language="JavaScript">
function ChkFields() {
if (document.myform.username.value=='') {
window.alert ("请输入用户姓名!")
return false
}
return true
}
function ResetPwd(aid)
{
var strUrl;
strUrl = "AdminResetpwd.asp?aid="+aid;
myform.action = strUrl;
myform.submit();
}
</script>
<body>
<%
Dim aid
aid = Request.QueryString("aid")
sql = "Select * From Admin Where AdminId='"&aid&"'"
Set rs = Conn.Execute(sql)
If rs.Eof Then
%>
<script language="javascript">
alert("不存在此用户名!");
history.go(-1);
</script>
<%
Else
aname = rs("Name")
%>
<form method="POST" action="AdminSave.asp" name="myform" onsubmit="return ChkFields()">
<h3><p align="center">管理员基本信息</p></h3>
<input type="hidden" name="userid" value="<%=aid%>">
<input type="hidden" name="isadd" value="edit">
<table align="center" border="1" cellpadding="1" cellspacing="1" width="80%" bordercolor="#008000" bordercolordark="#FFFFFF">
<tr>
<td align=left>用户名</td>
<td><%=aid%></td>
</tr>
<tr>
<td align=left>用户姓名</td>
<td><input type="text" name="username" value="<%=aname%>"></td>
</tr>
</table>
<p align="center">
<input type="submit" value=" 提 交 " name="B2"></p>
</form>
<%End If%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -