manage_admin.asp

在线经销商回单管理系统在线经销商回单管理系统

<!--#include file="conn.asp"-->
<!--#include file="admin.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sqltext="select * from admin"
rs.open sqltext,conn,1,1
%>
<script language="javascript">
function confirmdel(id){
if (confirm("真的要删除此管理员帐号?"))
window.location.href="Delmanager.asp?id="+id+"  "   }
</script>
<SCRIPT language=javascript id=clientEventHandlersJS>
<!--
function form1_onsubmit()
{
if (document.FORM1.pwd1.value!=document.FORM1.pwd2.value)
{
alert ("请确认您的密码。");
document.FORM1.pwd1.value='';
document.FORM1.pwd2.value='';
document.FORM1.pwd1.focus();
return false;
}
}
//-->
</SCRIPT>
<!-- #include file="Inc/Head.asp" -->
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
  <tr> 
    <td align="center" valign="top"> <br> <strong><br>
      </strong><br>      
      <strong> </strong>
      <table width="260" border="0" cellpadding="0" cellspacing="1" bgcolor="#333333">
             <form name="form1" method="post" action="Addmanagerok.asp">
 <tr>
          <td height="22" colspan="2" bgcolor="#CCCCCC">&nbsp;&nbsp;&nbsp| 添加管理员</td>
        </tr>
        <tr>
          <td width="62" height="22" bgcolor="#FFFFFF">&nbsp;帐号：</td>
          <td width="236" height="22" bgcolor="#FFFFFF"><label>
            &nbsp;
            <input name="uid" type="text" id="uid" >
          </label></td>
        </tr>
        <tr>
          <td height="22" bgcolor="#FFFFFF">&nbsp;密码：</td>
          <td height="22" bgcolor="#FFFFFF"><label>&nbsp;
            <input name="password" type="text" id="password">
          </label></td>
        </tr>
        <tr>
          <td height="22" bgcolor="#FFFFFF">&nbsp;</td>
          <td height="24" bgcolor="#FFFFFF"><label>
            <input type="submit" name="Submit" value="提交">
            &nbsp;&nbsp;
            <input type="reset" name="Submit2" value="重置">
          </label></td>
        </tr>      </form>

      </table>
      <p>&nbsp;</p>
      <p>&nbsp;</p>
      <table width="600" border="0" cellpadding="0" cellspacing="1" bgcolor="#333333">
	  
        <tr>
          <td height="22" bgcolor="#CCCCCC">&nbsp;&nbsp;用户名</td>
          <td height="22" bgcolor="#CCCCCC">&nbsp;&nbsp;最后登录IP</td>
          <td height="22" bgcolor="#CCCCCC">&nbsp;&nbsp;最后登录时间</td>
          <td height="22" bgcolor="#CCCCCC">&nbsp;&nbsp;登录次数</td>
          <td bgcolor="#CCCCCC">&nbsp;删除</td>
        </tr>
			  <% 
	  dim Rs
	  Set Rs=conn.execute("select * from admin order by id desc")
	  do while not Rs.eof
	   %>

        <tr>
          <td height="22" bgcolor="#FFFFFF">&nbsp;<%= Rs("UserName") %></td>
          <td height="22" bgcolor="#FFFFFF">&nbsp;<%= Rs("LastLoginIP") %></td>
          <td height="22" bgcolor="#FFFFFF">&nbsp;<%= Rs("LastLoginTime") %></td>
          <td height="22" bgcolor="#FFFFFF">&nbsp;<%= Rs("LoginTimes") %></td>
          <td height="22" bgcolor="#FFFFFF">&nbsp;<a href="Delmanager.asp?id=<%= Rs("id") %>">删除</a></td>
        </tr>
		<% 
		Rs.movenext
		loop
		Rs.close
		 %>
      </table>
    <p>&nbsp;</p></td>
  </tr>
</table>
<!-- #include file="Inc/Foot.asp" -->