📄 deleteadmin.asp
字号:
<!--#include file="const.asp"-->
<!--#include file="path.asp"-->
<!--#include file="IsAdmin.asp"-->
<%
if Admin_Flag=1 then
set rs = conn.execute("select * from Admin where ID<>"&session("Session_Admin") )
%>
<HTML><HEAD><TITLE><%=WebTitle%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK
href="styles.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2600.0" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff leftMargin=0 topMargin=0>
<TABLE cellSpacing=0 cellPadding=0 width="95%" align=center bgColor=#ffffff
border=0>
<TBODY>
<TR>
<TD>
<TABLE cellSpacing=1 cellPadding=6 width="100%" bgColor=#BFD3EE
border=0><TBODY>
<TR>
<TD vAlign=center align=middle
bgColor=#BFD3EE><div align="center"><A
href="<%=CompanyLink%>"><%=CompanyName%></A>网上招标系统</div></TD>
</TR>
<TR>
<TD vAlign=center bgColor=#ffffff>
<DIV align=left></DIV>
<TABLE cellSpacing=0 cellPadding=5 align=center bgColor=#BFD3EE
border=0>
<!--DWLayoutTable-->
<TBODY>
<TR bgColor=#ffffff>
<TD colSpan=2> <P> </P></TD>
</TR>
<TR bgColor=#BFD3EE>
<TD colSpan=2><b>操作:删除管理员</b></TD>
</TR>
<form name=DeleteAdmin action=DeleteAdminDone.asp method=post>
<%
While not (rs.bof or rs.eof)
%>
<TR align="center" bgColor=#ffffff>
<TD height="26"
colSpan=2
style="BORDER-RIGHT: #BFD3EE 1px solid; BORDER-LEFT: #BFD3EE 1px solid;BORDER-Bottom: #BFD3EE 1px solid"><font color=red><%=rs("AdminName")%></font>
<input type="checkbox" name="<%=rs("ID")%>" value="delete"> </TD>
</TR>
<%
rs.movenext
Wend
%>
<TR bgColor=#ffffff>
<TD
style="BORDER-RIGHT: #BFD3EE 1px solid; BORDER-LEFT: #BFD3EE 1px solid"
colSpan=2><DIV align=center>
<input type="submit" style="BORDER-RIGHT: #BFD3EE 2px solid; BORDER-TOP: #BFD3EE 2px solid; FONT-SIZE: 9pt; BACKGROUND: #f0f0f0; BORDER-LEFT: #BFD3EE 2px solid; WIDTH: 120px; BORDER-BOTTOM: #BFD3EE 2px solid; HEIGHT: 20px" name="-1" value="删除所选管理员"> <a href="DeleteAll.asp">删除所有</a>
</div></TD>
</TR>
</form>
<TR bgColor=#ffffff>
<TD
style="BORDER-RIGHT: #BFD3EE 1px solid; BORDER-LEFT: #BFD3EE 1px solid"
colSpan=2><DIV align=center><a href="exit.asp">注销</a> <a href="AdminManageTools.asp">返回</a></div></TD>
</TR>
<TR>
<TD width="250" bgColor=#BFD3EE>如有问题请与管理员联系：</TD>
<TD width="282"><A
href="mailto:<%=AdminEmail%>"><%=AdminEmail%></A></TD>
</TR>
<TR bgColor=#ffffff>
<TD colSpan=2> </TD>
</TR>
</TBODY>
</TABLE></TD></TR>
<TR>
<TD vAlign=center bgColor=#BFD3EE>
<DIV align=center><A
href="
<%=CompanyLink%>"><%=CompanyName%></A>版权所有</DIV></TD></TR>
<TR>
<TD></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<P>
<P></P></BODY></HTML>
<%
else
response.write "<script language=javascript>"
response.write"alert('你的权限不够此操作！');"
response.write"location.href='AdminLogin.asp';"
response.write "</script>"
end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -