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

📄 admin_list.asp

📁 这是我根据动网新闻核心自行设计的校园新闻系统
💻 ASP
字号:
<!-- #include file="../inc/const.asp" -->
<%
pagename="adminlist"
pageadmin=10
%>

<!-- #include file="../inc/conn.asp" -->
<!-- #include file="../inc/function.asp" -->
<!-- #include file="../inc/vote_function.asp" -->
<!-- #include file="../inc/sql.asp" -->
<!-- #include file="../inc/config.asp" -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"><link rel="stylesheet" href="../Inc/styles.css" type="text/css">
</head>
<form method="POST" action="admin_Save.asp?action=add">
<table width="100%" border="0" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#111111" id="table1">
	<tr>
		<td width="15" height="18">
		</td>
		<td class="heading1" height="18">管理员管理</td>
	</tr>
	<tr>
		<td height="16" width="15"></td>
		<td class="body" height="16">
		在这里可以看到所有的管理员列表,并对这些管理员进行修改,删除操作,同样也可以进行增加操作</td>
	</tr>
	<tr>
		<td height="16" width="15"></td>
		<td class="body" height="16"></td>
	</tr>
	<tr>
		<td height="17" width="15"></td>
		<td class="body" height="17">
		<table width="98%" border="0" cellspacing="0" cellpadding="0" class="bevel1" id="table2">
			<tr>
				<td>&nbsp;&nbsp;新增管理员</td>
			</tr>
		</table>
		</td>
	</tr>
	<tr>
		<td height="17" width="15"></td>
		<td class="body" height="17">
		</td>
	</tr>
	<tr>
	
		<td height="17" width="15"></td>
		<td class="body" height="17">
		<table border="1" width="98%" id="table3" cellspacing="0" cellpadding="0" style="border-collapse: collapse" class="bevel2">
			<tr>
				<td align="center" class="body" height="30">
				<p align="left"> &nbsp; 登陆名:<input type="text" name="username" size="16">&nbsp; 
				密码:<input type="text" name="password" size="18">&nbsp;&nbsp; 权限:<select size="1" name="admin">
				<option value="1" selected>普通管理员</option>
				<option value="10">超级管理员</option>
				</select></td>
			</tr>
			</table>
		</td>
		
	</tr>
	<tr>
		<td height="17" width="15"></td>
		<td class="body" height="17">
		</td>
	</tr>
	<tr>
		<td height="17" width="15"></td>
		<td class="body" height="17">
		<input type="submit" value="新增管理员" name="B1">&nbsp;
		<input type="reset" value="重置" name="B2"></td>
	</tr>
	<tr>
		<td height="17" width="15"></td>
		<td class="body" height="17">
		</td>
	</tr>
	<tr>
		<td height="17" width="15"></td>
		<td class="body" height="17">
		<table width="98%" border="0" cellspacing="0" cellpadding="0" class="bevel1" id="table6">
			<tr>
				<td>&nbsp;&nbsp;管理员列表</td>
			</tr>
		</table>
		</td>
	</tr>
	<tr>
		<td height="17" width="15"></td>
		<td class="body" height="17">
		</td>
	</tr>
	<tr>
		<td height="17" width="15"></td>
		<td class="body" height="17">
		<table border="1" width="98%" id="table5" cellspacing="0" cellpadding="0" style="border-collapse: collapse" class="bevel2">
			<tr>
				<td align="center" class="body" height="25" bgcolor="#C0C0C0">
				权限</td>
				<td align="center" class="body" height="25" bgcolor="#C0C0C0">
				<font size="2">管理员</font></td>
				<td width="100" align="center" class="body" height="25" bgcolor="#C0C0C0">
				<font size="2">修改</font></td>
				<td width="100" align="center" class="body" height="25" bgcolor="#C0C0C0">
				<font size="2">删除</font></td>
			</tr>
			<%set rs=conn.execute("select id,adminname,admin from vote_admin where userid='"&userid&"'")
			a=1
			dim adminname,admin,adminid
			do while not rs.eof
				adminid=rs(0)
				adminname=rs(1)
				admin=rs(2)
				if admin="1" then
					admin="普通管理员"
				elseif admin="10" then
					admin="超级管理员"
				end if				
				
			%>
				<tr bgcolor=<%=settrbg(a)%>>
					<td align="center" class="body" height="25">
					 <%=admin%></td>
					<td align="center" class="body" height="25">
					 <%=adminname%></td>
					<td width="100" align="center" class="body" height="25">
					<a href="Mod_admin.asp?id=<%=adminid%>">
					<img border="0" src="../Pic/modify.gif" width="20" height="20"></a></td>
					<td width="100" align="center" class="body" height="25">
					<a href="admin_save.asp?action=del&id=<%=adminid%>">
					<img border="0" src="../Pic/delete.gif" width="20" height="20"></a></td>
				</tr>
				<%a=a+1
				rs.movenext
				loop
				rs.close
				set rs=nothing
				call connclose%>
			</table>
		</td>
	</tr>
</table>
</form>

⌨️ 快捷键说明

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