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

📄 admin_add_admin.asp

📁 新世纪影院源码
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="xshjyy.asp"-->
<%'---------程序编写说明-------%> 
<%'本程序由junping96编写
'程序名称:新世纪影院VOD播放系统(商业版)
'FileName: Admin_add_admin.asp
'EditDate:2003-12-07
'Editer:junping96
'Email:junping96@163.com
'QQ:       249112913 249114058
'请尊重本人劳动,禁止修改版权,有任何问题请和我联系。
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta name="”keywords”" content="”新世纪影院VOD影视播放程序出售”">
<meta name="”description”" content="”新世纪影院VOD影视(商业版)出售”">
<title>新世纪影院</title>
<link rel="stylesheet" type="text/css" href="../css/css.css">
</head>

<body bgcolor="#FF9900" text="#000000" topmargin="50" leftmargin="1">
<CENTER>

   <%
   act=request.querystring("act")
   if act<>"save" then
   %>
  <table width="240" border="0" cellspacing="1" cellpadding="0">
    <tr>
      <td align="center" height="22" valign="middle" bgcolor="#FFFFFF">管理员添加</td>
    </tr>
  </table>
  <table width="240" border="0" cellspacing="1" cellpadding="0">
    <form name=admininfo method="post" action="admin_add_admin.asp?act=save">
      <tr valign="middle" align="center" bgcolor="#FFFFFF"> 
        <td width="75" height="35">帐号</td>
        <td width="202" height="35"> 
          <input type="text" name="admin" class="inputs">
        </td>
    </tr>
      <tr valign="middle" align="center" bgcolor="#FFFFFF"> 
        <td width="75" height="35">密码</td>
        <td width="202" height="35"> 
          <input name="password" class="inputs" size="20" type="password">
        </td>
    </tr>
    <tr valign="middle" align="center" bgcolor="#FFFFFF"> 
        <td width="75" height="35">重复密码</td>
        <td width="202" height="35"> 
          <input name="password01" class="inputs" size="20" type="password">
        </td>
    </tr>

	      <tr valign="middle" align="center" bgcolor="#FFFFFF"> 
        <td colspan="2" height="35">
          <select name="flag">
            <option selected>请选择管理员等级</option>
            <option value=0>系统管理员 </option>
            <option value=1>普通管理员</option>
          </select>
        </td>
        </tr>
         <tr valign="middle" align="center" bgcolor="#FFFFFF"> 
        <td colspan="2" height="22" valign="middle" align="left">
        说明:
        </td>
        </tr>
 <tr valign="middle" align="center" bgcolor="#FFFFFF"> 
        <td colspan="2" height="22" valign="middle" align="left">
        1、密码必须6位以上,建议是字母数字组合
        </td>
        </tr>
 <tr valign="middle" align="center" bgcolor="#FFFFFF"> 
        <td colspan="2" height="22" valign="middle" align="left">
        2、帐号不可以重复。
        </td>
        </tr>
 <tr valign="middle" align="center" bgcolor="#FFFFFF"> 
        <td colspan="2" height="22" valign="middle" align="left">
        3、密码要牢记。
        </td>
        </tr>

      <tr valign="middle" align="center" bgcolor="#FFFFFF"> 
        <td colspan="2" height="35"> 
          <input type="submit" name="Submit" value="提交">
              
          <input type="reset" name="Submit2" value="重置">
        </td>
    </tr>
	</form>
  </table>
  <%
  else
  admin=trim(request.form("admin"))
  password=trim(request.form("password"))
  password01=trim(request.form("password01"))
  flag=request("flag")
  if admin="" or password="" or flag="" or password01="" then
  response.write"<script>alert('错误,资料不完整');history.back(-1);</script>"
  response.end
  end if
  if len(password)<6 then
  response.write"<script>alert('错误,密码必须是6位以上');history.back(-1);</script>"
  response.end
  end if
  if password<>password01 then
  response.write"<script>alert('错误,两次密码不相同');history.back(-1);</script>"
  response.end
  end if
  set rs=server.createobject("adodb.recordset")
  sql="select id from admin where admin='"&admin&"'"
  rs.open sql,conn,1,1
  if not rs.eof or bof then
  response.write"<script>alert('错误,该管理员名称已经被使用,请换用其他的帐号');history.back(-1);</script>"
  response.end
  end if
  rs.close
  set rs=nothing
  set rs=server.createobject("adodb.connection")
  sql="insert into admin(admin,password,flag) values('"&admin&"','"&password&"','"&flag&"')"
  rs.open conn  
  rs.execute(sql)
  rs.close
  set rs=nothing
  response.write"<script>alert('管理员添加成功');history.back(-1);</script>"
  end if
  %>
</center>
</body>
</html>

⌨️ 快捷键说明

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