⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 add_user.asp

📁 首页由top.asp index_asp.asp link.asp end.asp构成
💻 ASP
字号:
<%
if session("flag")=1 then
%>
<!--#include file="pic_conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Language" content="en-us">
<meta name="GENERATOR" content="Microsoft FrontPage 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<link rel=stylesheet type=text/css href=style/style.css>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>管理员添加</title>

<script language="javascript">
function check()

{
  if(document.form1.name.value=="")
    {
      alert("用户名为空");
      return false;
    }
    
  if(document.form1.password1.value=="")
    {
      alert("密码不能为空");
      return false;
    }
    
  if((document.form1.password1.value)!=(document.form1.password2.value))
    {
      alert("密码不匹配");
      return false;
    }

}
</script>

</head>
<body topmargin="1" leftmargin="2" bgcolor="#799AE1">
<%
dim action,userid
action=request.QueryString("action")
userid=request.QueryString("userid")
select case action
case "add"
set Rs=GrateRs("select * from admin",3)
Rs.movelast
%>
<div align="center">
 <form method="post" action="add_user.asp?action=updata&userid=<%=Rs("adminid")%>" name="form1" onsubmit="javascript:return check();">
    <table width="396" border="0" cellspacing="1" cellpadding="0" style="border-collapse: collapse">
      <tr bgcolor="#CCCCCC">
        <td height="25" class=c2 colspan="2" width="392">
        <div align="center">
          <font size="2">新增管理员</font></div>
        </td>
      </tr>
      <tr>
        <td height="30" style="color: black; border-style: none" width="253" class=c3>
        <div align="center">
          <font size="2">用 户 名  <input type="text" name="name" size="20">
          </font>
        </div>
        </td>
        <td height="30" style="color: black; border-style: none" width="138" class=c2> </td>
      </tr>
      <tr>
        <td height="30" style="color: black; border-style: none" width="253" class=c3>
        <div align="center">
          <font size="2">初始密码  
			<input type="password" name="password1" size="20">
          </font>
        </div>
        </td>
        <td height="30" style="color: black; border-style: none" width="138" class=c2>
        <span lang="zh-cn"><font size="2">数字+字母10位以上</font></span></td>
      </tr>
      <tr>
        <td height="30" style="color: black; border-style: none" width="253" class=c3>
        <div align="center">
          <font size="2">确认密码  
			<input type="password" name="password2" size="20">
          </font>
        </div>
        </td>
        <td height="30" style="color: black; border-style: none" width="138" class=c2>
        <span lang="zh-cn"><font size="2">数字+字母10位以上</font></span></td>
      </tr>
      <tr>
        <td height="30" style="color: black; border-style: none" width="253" class=c3>
        <p align="center"><font face="Verdana" size="2">&nbsp;权限设置</font> <span lang="zh-cn">&nbsp;&nbsp;&nbsp;
        </span><select size="1" name="flag">
        <option value="2">====图片添加员====</option>
        <option value="1">====网站管理员====</option>
        </select></td>
        <td height="30" style="color: black; border-style: none" width="138"class=c2> </td>
      </tr>
    <tr>
    <td height="30" style="color: black; border-style: none" width="391" class=c2 colspan="2" align="center">
     <input type="submit" name="Submit" value="添加">
    </td>
    </tr>
</table>
  </form>
<%
case "updata"
set Rs=GrateRs("select * from admin where adminid="&userid,3)
Rs.addnew
Rs("adminname")=request.form("name")
Rs("adminpassword")=request.form("password1")
Rs("flag")=request.form("flag")
Rs.update
response.write "<script language='JavaScript'>{window.location='admin_user.asp';}</script>"
%>
<%
end select
%> 
</div>
</body>
</html>
<%
else
%>
<script language="javascript">alert("你没有权限进行该项管理!")</script>
<%
response.write "<script language='JavaScript'>{window.location='right.htm';}</script>"
end if
%>

⌨️ 快捷键说明

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