📄 adminsave.asp
字号:
<!--#include File="../ConnDB.asp"-->
<!--#include file="isAdmin.asp"-->
<html>
<head>
<title>保存管理员信息</title>
</head>
<body>
<%
Dim aid,aname
Dim sql
aid = Request("userid")
aname = Request("username")
If Request.form("isadd")="1" Then
'判断此管理员是否存在
Set rs = Conn.Execute("Select * From Admin Where AdminId='" & aid & "'")
If Not rs.Eof Then
%>
<script language="javascript">
alert("已经存在此用户名！");
history.go(-1);
</script>
<%
Else
'创建管理员用户
sql = "Insert Into Admin(AdminId,Name,PassWd) Values('"&aid&"','"&aname&"','111111')"
Conn.Execute(sql)
End If
Else
'更新管理员信息
sql = "Update Admin set Name='"&aname&"' where AdminId='"&aid&"'"
Conn.Execute(sql)
End If
Response.Write "<h2>管理员信息已成功保存！</h2>"
%>
</body>
<script language="javascript">
opener.location.reload();
setTimeout("window.close()",800);
</script>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -