📄 manage.asp
字号:
<!--#include file="../Inc/Conn.asp" -->
<!--#include file="Check.asp" -->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>管理页面</title>
<LINK href="style.css" type=text/css rel=stylesheet>
</head>
<body leftmargin=0 bottommargin=0 rightmargin=0 topmargin=0>
<script src="images/admin.js" type="text/javascript"></script>
<div class=menuskin id=popmenu
onmouseover="clearhidemenu();highlightmenu(event,'on')"
onmouseout="highlightmenu(event,'off');dynamichide(event)" style="Z-index:100"></div>
<div align=center>
<script language = JavaScript>
function showsetting(myform){
for (var j=0;j<7;j++){
var tab = eval('document.all.settable'+j);
if(myform.AdsType.selectedIndex==j)
tab.style.display = '';
else
tab.style.display = 'none';
}
}
</script>
<!--#include file="Top.asp" -->
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="tableBorder">
<tr>
<th>管理员管理</th>
</tr>
<tr><td class=BodyTitle colspan=2 height=23 style="FONT-SIZE: 9pt; FILTER: dropshadow(color=#FFFFFF,offx=1,offy=1); COLOR: #000000;"> </td>
</tr>
</table><BR>
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="tableBorder">
<tr>
<th width="6%" noWrap>编号</th>
<th noWrap>管理员名称</th>
<th width="18%" noWrap>登录密码</th>
<th colspan="2" noWrap>管理</th>
</tr>
<%
Set rs=server.CreateObject("adodb.recordset")
rs.open "select * from LangDaoManage order by ID desc",Conn,1,1
i=1
do while not rs.eof
%>
<tr height="25">
<td class=forumRow align=center><%=i%></td>
<td align=center class=forumRow><%=rs("UserName")%></td>
<td align=center class=forumRow><%=rs("Password")%></td>
<td width="9%" align=center noWrap class=forumRow>
<a href="Manage_Mod.asp?ID=<%=rs("ID")%>" target="main">管理</a></td>
<td width="9%" align=center class=forumRow><A HREF="Manage_Ok.asp?ID=<%=rs("ID")%>&act=del" onClick="Ask('<%=rs("UserName")%>')">删除</A></td>
</tr>
<%
i=i+1
rs.movenext
loop
rs.close
set rs=nothing
%>
</table>
</div>
</body></html>
<script language="vbscript">
sub Ask(LoginName)
if not confirm("您确定要删除"&LoginName&"吗?") then
window.event.returnvalue=false
exit sub
end if
end sub
</script>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -