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

📄 admin_edit_user.asp

📁 于毕业设计与论文以及做课题用-MSK Simulink simulation program for the design and graduation thesis topic, and makin
💻 ASP
字号:
<!--#include file="../Conn.asp"-->
<!--#include file="Admin_Session.asp"-->


<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css/style.css" rel="stylesheet" type="text/css">
</head>
<script languang="javascipt">
	function doSubmit()
	{       if (document.Form1.AdminName.value==""){
			alert("请填输入用户名称!");
			document.Form1.AdminName.focus()
			return false;
			}
				
			return true;
	}
  function CheckAll(form)
		{
		for (var i=0;i<form.elements.length;i++)
		{
		var e = form.elements[i];
		if (e.Name != "chkAll"&&e.disabled==false)
		e.checked = form.chkAll.checked;
		}
		}
</Script>
<body>
<div align="center">
  <table cellpadding="3" cellspacing="1" border="0" width="100%" class="tableBorder" align=center>
    <tr> 
      <th height=50 colspan="3" class="tableHeaderText">修改帐号信息</th>
    </tr>
	<form name="Form1" method="post" action="Admin_Admin_User_Save.asp" Onsubmit="return doSubmit();">
	<%
	Set RsUser= Server.CreateObject("AdoDB.ReCordset")
	Sqlstr="Select * From [HX33_Admin] Where ID="&ID
	RsUser.Open Sqlstr,Conn,1,1
	If Not RsUser.Eof Then
	%>
    <tr>
      <td align="center"  class="forumRowHighlight">管理员</td>
      <td align="center"  class="forumRowHighlight">密 码</td>
      <td align="center"  class="forumRowHighlight">等级</td>
    </tr>
    <tr>
      <td align="center"  class="forumRowHighlight"><input name="AdminName" type="text"  onkeyup="value=value.replace(/[\W]/g,'')" value="<%=RsUser("AdminName")%>" size="12"   
  onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))"></td>
      <td align="center"  class="forumRowHighlight"><input name="AdminPass" type="password" size="12" onKeyUp="value=value.replace(/[\W]/g,'')"   
  onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))"></td>
      <td align="center"  class="forumRowHighlight"><input type="radio" name="AdminRank" value="1" <%IF RsUser("AdminRank")=1 Then%>checked<%End IF%>>
        管理
          <input name="AdminRank" type="radio" value="2" <%IF RsUser("AdminRank")=2 Then%>checked<%End IF%>>
          添加
          <input type="radio" name="AdminRank" value="3" <%IF RsUser("AdminRank")=3 Then%>checked<%End IF%>>
          查看
          <input type="hidden" name="id" value="<%=RsUser("ID")%>"><input type="hidden" name="action" value="edit"></td>
    </tr>
    <tr> 
      <td colspan="3" align="center"  class="forumRowHighlight"> 
      <p>&nbsp;&nbsp;&nbsp;&nbsp;
        <input name="Submit" type="submit" id="Submit" value="修 改">
      </p>        </td>
  </tr>
  <%
  RsUser.Close
  set RsUser=Nothing
  End IF
  %>
  </form>
</table>
  <table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="tableBorder"  >
    <tr>
      <th  class="tableHeaderText" align="center" height="20"><font color="#FFFFFF">操作注意事项及说明</font></th>
    </tr>
    <tr>
      <td height="38" class="forumRowHighlight">
        <table width="80%" border="0" align="center" cellpadding="5" cellspacing="0">
          <tr>
            <td class="forumRowHighlight"><font color="#FF0000"> ·添加人员只能添加、修改、删除资料。<br>
            ·管理员拥有本站所有管理权限。<br>
            ·登录密码采用MD5不可逆转方式加密,如不修改密码,请留空。 </font></td>
          </tr>
      </table></td>
    </tr>
  </table>
</div>
</body>
</html>

⌨️ 快捷键说明

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