📄 admin_master.asp

📁 网络办公系统源码
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../config.asp"-->
<!--#include file="checklogin.asp"-->
<!--#include file="../inc/md5/ss_md5.asp"-->

<%
if  ChkAdmin(999)=False then
   call message("您没有 管理员管理 权限","back")
   call endexit()
end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="style.css" type=text/css rel=stylesheet>

<title>无标题文档</title>
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
.style1 {
	color: #FFFFFF;
	font-weight: bold;
}
.style4 {color: #CECECE}
-->
</style>
</head>
<%
act=request.QueryString("act")
id=replace(request("id"),"'","")
adminuid=trim(request.Form("adminuid"))
adminpwd=ss_md5(trim(request.Form("adminpwd")))
adminflag=trim(request.Form("adminflag"))
uname=trim(request.Form("uname"))
'----------------------------------
if act="add" then
         sql="insert into oa_systemadmin(adminuid,adminpwd,adminflag,uname) values('"&adminuid&"','"&adminpwd&"',"&adminflag&",'"&uname&"')"
          conn.execute(sql)
          response.Write("<script>alert('添加成功');window.location.href='admin_master.asp';</script>")
          response.End()
elseif act="del" then
		conn.execute("delete from oa_systemadmin where id="&id)
		response.Redirect("admin_master.asp")  
end if		  
%>
<body>
<table width="99%"  border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#F2F2F2" class="tabel1">
  
  <tr align="center">
    <td height="25" colspan="4" bgcolor="#CC0000"><span class="style1">管理员管理</span></td>
  </tr>
  <tr bgcolor="#CC6600">
    <td width="18%" height="25" align="center">帐号 </td>
    <td width="24%" height="25" align="center">姓名</td>
    <td width="25%" align="center">级别</td>
    <td width="33%" align="left">&nbsp;</td>
  </tr>

<%
	sql="select * from oa_systemadmin"
	set rs=conn.execute(sql)
	do while not rs.eof
%>
  <tr bgcolor="#F4F4F4">
    <td height="25" align="center"><%=rs("adminuid")%></td>
    <td height="25" align="center"><%=rs("uname")%></td>
    <td height="25" align="center"><%if rs("adminflag")=999 then%>高级管理员<%else%>普通管理员<%end if%></td>
    <td height="25" align="left"><%if cint(trim(rs("adminflag")))=1 then%><a href="?act=del&id=<%=rs("id")%>">删除</a><%else%>
      <span class="style4">删除</span>
      <%end if%> 
    | <a href="userqx.asp?id=<%=rs("id")%>">编辑权限 </a></td>
  </tr>
  <%
  	rs.movenext
	loop
	rs.close
	set rs=nothing
  %>
  
  <tr bgcolor="#F9F9F9">
    <td height="25" align="center">&nbsp;</td>
    <td height="25" colspan="2" align="left">&nbsp;</td>
    <td align="left">&nbsp;</td>
  </tr>
  <form name="myform1" method="post" action="admin_master.asp?act=add" onSubmit="return CheckForm();">
  <tr bgcolor="#F9F9F9">
    <td height="25" align="center">添加系统帐号</td>
    <td height="25" align="left">帐号:
      <input name="adminuid" type="text" class="tabel1" id="adminuid"></td>
    <td height="25" align="left">密码:
      <input name="adminpwd" type="text" class="tabel1" id="adminpwd"></td>
    <td align="left">&nbsp;</td>
  </tr>
  <tr bgcolor="#F9F9F9">
    <td height="25" align="center">&nbsp; </td>
    <td height="25" align="left">      姓名:
      <input name="uname" type="text" class="tabel1" id="uname">      </td>
    <td height="25" align="left">级别:
      <input name="adminflag" type="radio" value="1" checked>
      普通
      <input type="radio" name="adminflag" value="999">
      高级</td>
    <td align="left"><input name="Submit" type="submit" class="tabel1" id="Submit3" value="添加"></td>
  </tr>
  </form>
</table>
</body>
</html>
<script language="javascript">
function CheckForm()
{
    var objFrm=document.myform1;
	if(objFrm.adminuid.value=="")
	{
		alert("请输入帐号！");
		objFrm.adminuid.focus();
		return false;
	}
	if(objFrm.adminpwd.value=="")
	{
		alert("请输入密码！");
		objFrm.adminpwd.focus();
		return false;
	}
		if(objFrm.uname.value=="")
	{
		alert("请输入姓名！");
		objFrm.uname.focus();
		return false;
	}

	return true;

}
</script>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -