📄 admin.asp
字号:
<!-- #include file="密码验证.asp" -->
<%
if NOIPUserTit<>"管理员" then Response.Status="404" : Response.End
if Request.QueryString("with")= "addclass" then
if Request("CLS_NAME")<>"" then
set rs = server.CreateObject("ADODB.Recordset")
rs.open "SELECT * FROM 班级 WHERE id=0" & classnum ,conn ,3,3
rs.addnew
rs("班名")=Request("CLS_NAME")
id=rs("id")
rs.update
rs.close
set rs= nothing
Response.Redirect "admin.asp?class=" & id
end if
end if
%>
<BODY>
<STYLE>
<!--
.sec_menu {
BORDER-RIGHT: white 1px solid; BACKGROUND: #d6dff7; OVERFLOW: hidden; BORDER-LEFT: white 1px solid; BORDER-BOTTOM: white 1px solid
}
-->
</STYLE>
<%title="班级管理"%>
<!-- #include file="head.asp" -->
<script language=VBScript>
top.document.title="班级管理"
if instr(1,top.location,"index.asp")= 0 then top.location="index.asp?url=" & replace(self.location ,"&","%26")
</script>
<%if Request.QueryString("login")="ok" then %>
<SCRIPT>
if(self.top.location!=self.location )
{
top.document.frames["carnoc"].location.reload
}
</SCRIPT>
<%end if
%>
<%valigntop()%>
<span >
</span>
<table cellspacing="1" cellpadding="0" width="97%" align="center" border="0" class="a2" height="25">
<tr height="25" id=TableTitleLink>
<td width="100%" height="23" class="a1" align="middle">
<span><b>班级管理</b></span></td></tr>
<center>
<span >
<table cellspacing="1" cellpadding="0" width="97%" align="center" border="0" class="a2" height="25">
<tr height=25 class=a3 colspan=2>
<td width="10%"><center>id</center></td>
<td width="50%"><center>班名</center></td>
<td width="40%"><center>班长</center></td>
</tr>
<% set rs = server.CreateObject("ADODB.Recordset")
rs.open "SELECT * FROM 班级" ,conn ,3,3
do
%>
<tr height=25 class=a3 colspan=2>
<td width="10%"><center><%=rs("id")%></center></td>
<td width="50%"><center><a href="admin.asp?class=<%=rs("id")%>"><%=rs("班名")%></center></td>
<td width="40%"><center><%=id2name(rs("班长"))%></center></td>
</tr>
<%rs.movenext
loop until rs.eof
rs.close
set rs=nothing%>
<tr height=25 class=a3 colspan=3>
<td colspan=3>
<form method="POST" action="admin.asp?with=addclass" id=form2 name=form2>
添加：<input size="45" value="" name="CLS_NAME"> <input type="submit" value="add" name="B1">
</form>
</td>
</tr>
<form method="POST" action="admin_cls.asp?class=<%=classnum%>&admin=1" id=form2 name=form2>
<tr height=25 class=a3 colspan=2>
<td width="25%">班名</td>
<td colspan=2><input size="45" value="<%=CLS_NAME %>" name="CLS_NAME">
</td>
</a>
</tr>
<tr height=25 class=a3 colspan=3>
<td>LOGO</td>
<td colspan=2><input size="45" value="<%=CLS_LOGO%>" name="CLS_LOGO"></td>
</a>
</tr>
<tr height=25 class=a3 colspan=3>
<td>URL</td>
<td colspan=2>
<span >
<input size="45" name="CLS_URL" value="<%=CLS_URL%>"></a></span></td>
</tr>
<tr height=25 class=a3 colspan=3>
<a name="addedit">
<td>E-mail</td>
<td colspan=2><input size="45" name="CLS_EMAIL" value="<%=CLS_EMAIL%>"></td>
</a>
</tr>
<tr height=25 class=a3 colspan=3>
<a name="addedit">
<td>班长</td>
<td colspan=2><input size="45" name="CLS_MASTER" value="<%=id2name(CLS_MASTER)%>"></td>
</a>
</tr>
<tr height=25 class=a3 colspan=3>
<td colspan="3">
<p align="center">
<input type="submit" value="修改" name="B1"> <input type="reset" value="重置" name="B2"></p>
</td>
</tr>
</form>
</table>
</span>
<span ><%valignbottom()%></span></center> </table>
</span>
<!-- #include file="foot.asp" --></BODY></HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -