📄 classaddbj.asp
字号:
<!--#include file="dataconn.asp"-->
<!--#include file="Admin_IsLogin.asp" -->
<%
dim njname
njname=request.querystring("njname")
set rs=conn.execute("select distinct bjmaster from keren")
do while not rs.eof
set_bjmaster=set_bjmaster&"<option value='"&rs("bjmaster")&"' selected>"&rs("bjmaster")&"</option>"
rs.movenext
loop
set rs=nothing
%>
<HTML><HEAD><TITLE>学生信息添加</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<LINK
href="../inc/admin_style.css" type=text/css rel=stylesheet>
<script>
function del(datas,dname)
{
var truthBeTold = window.confirm("确定删除年级（"+dname+"）吗？");
if (truthBeTold)
{
document.location.replace(datas);
}
}
</script>
<style type="text/css">
<!--
.STYLE1 {color: #FFFFFF}
-->
</style>
</HEAD>
<body>
<br>
<table width="780" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="780" valign="top"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td valign="top" bgcolor="#FFFFFF"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td bgcolor="#336699"><table width="100%" cellpadding=4 cellspacing=1>
<tr>
<td width="93%" style="FILTER: progid:DXImageTransform.Microsoft.Gradient(gradientType=1,startColorStr=#3b839f,endColorStr=#eff4ff)" colspan=2> <span class="STYLE1">年级管理-->班级设置</span></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td align="center" valign="middle"><br><table width="90%" align="center" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="600">
<table width="98%" border="0" align="center">
<form name="form1" method="post" action="saveaddbj.asp">
<tr>
<td width="16%">添加新班级：</td>
<td width="71%"><input name="bjname" type="text" id="bjname" size="16">
班级人数：
<input name="bjstudent" type="text" id="bjstudent" size="8" maxlength="3">
班主任：
<label>
<select name="bjteacher" id="bjteacher">
<%=set_bjmaster%>
</select>
<input name="njname" type="hidden" id="njname" value="<%=njname%>">
</label></td>
<td width="13%"><input type="submit" name="Submit3" value="添加"></td>
</tr>
</form>
</table>
</tr>
</table>
<p> </p></td>
</tr>
<tr>
<td><table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="85" valign="top">
<table width="100%" border="1" cellpadding="1" cellspacing="0" bordercolorlight="#CCCCCC" bordercolordark="#FFFFFF">
<tr>
<td bgcolor="#C3CDDE"><div align="center"><strong>序号</strong></div></td>
<td bgcolor="#C3CDDE"><div align="center"><strong>年级</strong></div></td>
<td bgcolor="#C3CDDE"><div align="center"><strong>下属班级</strong></div></td>
<td bgcolor="#C3CDDE"><div align="center"><strong>班级人数</strong></div></td>
<td bgcolor="#C3CDDE"><div align="center"><strong>班主任</strong></div></td>
<td bgcolor="#C3CDDE"><div align="center"><strong>操作</strong></div></td>
</tr>
<%
set rs= Server.CreateObject("ADODB.Recordset")
rs.open ("select * from bj where njname='"&njname&"'"),conn,1,1
if rs.eof and rs.bof then
page=1
pages=1
totaldep=0
response.write"<tr><td></td><td></td><td></td><td width='100%' height='100' align='center' colspan='3'>没有相关的班级资料</td></tr>"
else
totaldep=rs.recordcount '总的条数
rs.pagesize=20 '每页显示的条数
pages=rs.pagecount '总的找到页数
page=request("page") '当前页
if page="" then
page=1
elseif page<1 then
page=1
end if
page=cint(page)
if page>pages then page=pages
rs.absolutepage=page
do while not rs.eof and i<rs.pagesize
i=i+1
%> <tr>
<td><div align="center"><%=rs("bjid")%></div></td>
<td><div align="center"><%=rs("njname")%></div></td>
<td><div align="center"><%=rs("bjname")%></div></td>
<td><div align="center"><%=rs("bjstudent")%></div></td>
<td><div align="center"><%=rs("bjteacher")%></div></td>
<td><div align="center">
<input type="button" name="Submit4" value="编辑" onClick=location.href="bjedit.asp?action=edit&id=<%=rs("bjid")%>">
<input type="button" name="Submit5" value="删除" onClick="javascript:del('bjedit.asp?action=del&id=<%=rs("bjid")%>','<%=rs("bjname")%>')">
</div></td>
</tr>
<%
rs.movenext
loop
end if
set rs=nothing
%> </table>
</td>
</tr>
<tr>
<td height="25"><div align="center">
<%
if pages>1 then
response.write"<table align='center' cellspacing='0' cellpadding='0' border='0' width='100%'>"&_
"<form method='POST' action='?'>"&_
"<tr><td height='15' width='50%'>共<font color='red'>"&totaldep&"</font>班 <font color='red'>"&pages&"</font>页 第<font color='red'>"&page&"</font>页 "&_
" <input type='text' name='page' size='5' maxlength='4'> <input type='submit' value='GO' name='B1'></td><td align='right' width='50%' height='15'>"
if page>1 then
response.write"<a href='?page=1'>首页</a> "&_
"<a href='?page="&page-1&"'>上一页</a> "
else
response.write"首页 上一页 "
end if
if page<pages then
response.write"<a href='?page="&page+1&"'>下一页</a> "&_
"<a href='?page="&pages&"'>尾页</a>"
else
response.write"下一页 尾页"
end if
response.write"</td></tr></form></table>"
end if
%>
</div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -