www.gusucode.com > 25175 学生成绩管理查询系统码程序 > ADMIN/admin_add.asp

    <!-- #include file="../config.asp" -->
<!-- #include file="../conn.asp" -->
<!-- #include file="inc.asp" -->
<%

Call admin_log
lj=replace(Checkstr(request("lj")),"-请选择年级-","")
bj=replace(Checkstr(request("bj")),"-请选择班级-","")
xq=replace(Checkstr(request("xq")),"-请选择学期-","")
kc=replace(Checkstr(request("kc")),"-请选择课程-","")
If request.querystring("kind")<>"xq" And request.querystring("kind")<>"post" And request.querystring("kind")<>"lj" And request.querystring("kind")<>"bjb" Then cj_select="yes"
'====================================================================
'25175成绩查询管理系统
'powered by 25175
'=-------------------------------------------------------------------
'= 文件名称:admin_add.asp
'= 摘    要:单信息添加文件
cj_webtit="后台管理首页 - 信息添加"
cj_webmap="<a href=admin.asp class=Class>后台管理首页</a> - 信息添加"

'= 最后日期:2006-3.1
'====================================================================
%>
<!-- #include file="admin_top.asp" -->
		<SCRIPT LANGUAGE="JavaScript">
<!--
	function showIntro(objID)
{

 if (document.getElementById(objID).style.display == "none") {
		document.getElementById(objID).style.display = "";
	}else{
		document.getElementById(objID).style.display = "none";
	}
}
//-->
</SCRIPT>

<%
Call admin_yz(2)

response.write "<table width=100% align=center border=0 cellpadding=0 cellspacing=0>"

if request.querystring("kind")="new" Then
Call admin_cj
Call admin_yz(2)
%>
<SCRIPT LANGUAGE = JavaScript>

var s=["lj","bj","xq","kc"];
var opt0 = ["-请选择年级-","-请选择班级-","-请选择学期-","-请选择课程-"];
function setup()
{
 for(i=0;i<s.length-1;i++)
 document.getElementById(s[i]).onchange=new Function("change("+(i+1)+")");
 change(0);
}
//-->
</SCRIPT>
		<tr>
		<td align="center">
			<br>
				<table width="98%" border='0' align='center' cellpadding='2' cellspacing='1' class='border'>
				<form name="form1" action="addu.asp" method="post">
					<tr align="center" class="title">
						<td height="31" colspan="2">添加单个学生的成绩</td>
					</tr> 

					<tr class="tdbg">
						<td width="27%" align="center">年级</td>
						<td width="73%">
							<select id="lj" name="lj" style="width:180px" tabindex="1" disabled>
								<option>-请选择年级-</option>
							</select>
						</td>
					</tr>
					<tr class="tdbg">
						<td width="27%" align="center">班级</td>
						<td width="73%">
							<select id="bj" name="bj" style="width:180px" tabindex="2" disabled>
								<option>-请选择班级-</option>
							</select>
						</td>
					</tr>
					<tr class="tdbg">
						<td align="center"> 学期  </td>
						<td>
							<select id="xq" name="xq" style="width:180px" tabindex="3" disabled>
								<option>-请选择学期-</option>
							</select>
						</td>
					</tr>
					<tr class="tdbg">
						<td align="center">课程 </td>
						<td>
							<select id="kc" name="kc" style="width:180px" tabindex="4" disabled>
								<option>-请选择课程-</option>
							</select>
							
						</td>
					</tr>
					<tr class="tdbg">
						<td align="center">学号 </td>
						<td><input name="xh" type="text" id="xh"></td>
					</tr>
					<tr class="tdbg">
						<td align="center">姓名  </td>
						<td><input name="user" type="text" id="user"></td>
					</tr>	  
					<tr class="tdbg">
						<td align="center">成绩 </td>
						<td><input name="cj" type="text" id="cj"  onkeydown="javascript:return   check_isnum()"></td>
					</tr>
					<tr class="tdbg">
						<td align="center"> 备注 </td>
						<td><input type="text" name="lx"></td>
					</tr>
					<tr align="center" class="tdbg">
						<td colspan="2">
							<input type="hidden" name="kind" value="6">
							<input type="submit" name="Submit" value="添加">
							<input type="reset" name="Submit2" value="重置">
						</td>
					</tr>
					<tr class="tdbg">
						<td colspan="2"> </td>
					</tr>
				</table>
			</form>
		</td>
	</tr>
		<%
		end If
		%>
<%if request.querystring("kind")="bj" Then
Call admin_yz(4)
if request.querystring("type")="del" Then
	Call del("id="&request.querystring("id"),"bjb")
	sql="select id from kcb where ljbj_id="&request.querystring("id")
	rs.open sql,conn,1,1
	Do While Not rs.eof
		set delcj=conn.execute("delete from cj_"&request.querystring("lj")&" where kcb_id="&rs(0)&"")
		rs.movenext
	loop
	rs.Close
	Call del("ljbj_id="&request.querystring("id"),"kcb")
	Call del("ljbj_id="&request.querystring("id"),"cj_mc")
	Call del("ljbj_id="&request.querystring("id"),"user")
End If

   page = CLng(request("page"))                            '利用CLng函数把page值转换为Long型
    judge=request("judge")
    judge2=request("judge2")
    judge3=0
	%>
	<SCRIPT LANGUAGE = JavaScript>

var s=["lj"];
var opt0 = ["-请选择年级-"];
function setup()
{
 for(i=0;i<s.length-1;i++)
 document.getElementById(s[i]).onchange=new Function("change("+(i+1)+")");
 change(0);
}
//-->
</SCRIPT>

	<tr>
		<td align="center" valign="top">
		<%Call admin_lx_top("班级信息管理")%>
		<br>
		<table width="98%" border='0' align='center' cellpadding='2' cellspacing='1' class='border'>
			<tr class="title">
				<td><b>操作:   <input type="button" onclick="javascript:showIntro('boysoft');showIntro('boysoft1');" name="Submit2" value="添加新班级">
				</td>
			</tr>
			<tr class="tdbg">
				<td>年级列表:<a href='admin_add.asp?kind=bj'><B>全部</B></a>
				<%
set rs=server.createobject("adodb.recordset")
sql="select lj from ljb"
rs.Open sql,conn,1,1
do while not rs.eof
response.write "  <a href='admin_add.asp?kind=bj&lj="&rs(0)&"'>"&rs(0)&"</a>"
rs.movenext
loop
rs.Close
%> 
	
				</td>
			</tr>
		</table>

		<div id=boysoft 
style="display: none">
<br>
		<table bgcolor="#ffffff" width="98%" border='0' align='center' cellpadding='2' cellspacing='1' class='border'>
		<form name="form1" method="post" action="addu.asp">
			<tr align="center" class="title">
				<td colspan="2">添加班级及其学号对应代码</td>
			</tr>
			<tr class="tdbg">
				<td align="center">年级</td>
				<td><select id="lj" name="lj" style="width:180px" tabindex="1">
						<option>-请选择年级-</option>
					</select>
				</td>
			</tr>
			<tr class="tdbg">
				<td width="26%" align="center">班级</td>
				<td width="74%">
					<input type="text" name="bj" size="30">
				</td>
			</tr>
			<tr class="tdbg">
				<td align="center">学号代码</td>
				<td>
					<input name="xhf" type="text" size="30">
				</td>
			</tr>
			<tr class="tdbg">
		<td align="center">班主任</td>
		<td><select name="admin_id" style="width:180px" tabindex="3">
				<option value="">-请选择老师-</option>
				<%
				sql="Select id,username from admin where qx>2"
				set rsadmin=server.createobject("adodb.recordset")
				rsadmin.open sql,conn,1,1
				Do While not rsadmin.eof
				response.write "<option value="&rsadmin(0)&">"&rsadmin(1)&"</option>"
				rsadmin.movenext
				loop
				rsadmin.close
				%>
			</select>
			</td>
		</tr>
			<tr align="center" class="tdbg">
				<td colspan="2">
					<input type="hidden" name="kind" value="2">
					<input type="submit" name="Submit" value="提交">&nbsp;
					<input type="reset" name="Submit2" value="清除">
					<input type="button" onclick="javascript:showIntro('boysoft');showIntro('boysoft1');" name="Submit2" value="返回">
				</td>
				</tr>
		</form>
		</table>
		</div>

		<div id=boysoft1>
			<table width="98%" border='0' align='center' cellpadding='2' cellspacing='1' class='border'>
				<tr align="center" class="title">
					<td width="40"><strong>ID</strong></td>
					<td width="96"><strong>年级</strong></td>
					<td width="152"><strong>班级</strong></td>
					<td width="96"><strong>主学号</strong></td>
					<td width="96"><strong>班主任</strong></td>
					<td width="96"><strong>操作</strong></td>
				</tr>
				<%
				if request.querystring("lj")<>"" Then
				sqlad="select xhf,lj,bj,ljb_id,bjb.id,admin_id from bjb,ljb where bjb.ljb_id=ljb.id and lj='"&request.querystring("lj")&"' order by bjb.id"
				Else
				sqlad="select xhf,lj,bj,ljb_id,bjb.id,admin_id from bjb,ljb where bjb.ljb_id=ljb.id order by bjb.id"
				End If 
				rs.open sqlad,conn,1,1
				if not (rs.EOF or rs.BOF) then
		rs.MoveFirst
		rs.PageSize = 12  '每页显示的条数  
		If page < 1 Then page = 1 
		If page > rs.PageCount Then page = rs.PageCount  
		rs.AbsolutePage = page
		For ipage = 1 To rs.PageSize
				%>
				<tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'">
					<td align=center><%=rs(4)%></td>
					<td><%=rs(1)%></td>
					<td><%=rs(2)%></td>
					<td><%=rs(0)%>&nbsp;</td>
					<td>
					<%
					If rs(5)<>0 Then 
					set rsbj=server.createobject("adodb.recordset")
					sqlbj="select username from admin where id="&rs(5)
					rsbj.open sqlbj,conn,1,1
						If rsbj.eof Or rsbj.bof Then
							admin_bj_xm="无管理员"	
						Else 
							admin_bj_xm=rsbj(0)
						End If
					Else 
						admin_bj_xm="无管理员"
					End If 
					response.write admin_bj_xm
					%>
					</td>
					<td align=center>
							<a href="updata.asp?kind=bj&id=<%=rs("id")%>&lj=<%=rs("lj")%>" title="<%=rs("xhf")%>">修改
							</a>
							<a href="admin_add.asp?kind=bj&type=del&lj=<%=rs(1)%>&id=<%=rs("id")%>" onclick="return confirm('确定要删除此班级吗?将会删除该班级以及该班级下的所有课程,成绩,学号!');">删除
							</a>
					</td>
				</tr>
				<%
			rs.MoveNext      
			If rs.EOF Then Exit For   
			Next
		%>
</table>
<%
Call pageinfo_b("admin_add.asp?kind=bj","&")
response.write "</div>"
rs.Close
set rs=nothing
set conn=nothing
end if%>

		</td>
	</tr>
<%
end If




if request.querystring("kind")="kc" Then
Call admin_yz(3)
	%>
	<SCRIPT LANGUAGE = JavaScript>

var s=["lj","bj","xq"];
var opt0 = ["-请选择年级-","-请选择班级-","-请选择学期-"];
function setup()
{
 for(i=0;i<s.length-1;i++)
 document.getElementById(s[i]).onchange=new Function("change("+(i+1)+")");
 change(0);
}
//-->
</SCRIPT>
			<td align="center">
					<table width="98%" border='0' align='center' cellpadding='2' cellspacing='1' class='border'>
					<form name="form1" method="post" action="addu.asp">
						<tr align="center" class="title">
							<td height="32" colspan="2">添加与班级相对应的课程及类型</td>
						</tr>
						<tr class="tdbg">
							<td width="26%" align="center">年级</td>
							<td width="74%">
								<select id="s1" name="lj" style="width:180px" tabindex="1">
									<option>-请选择年级-</option>
								</select>
							</td>
						</tr>
						<tr class="tdbg">
							<td width="26%" align="center">班级</td>
							<td width="74%">
								<select id="s2" name="bj" style="width:180px" tabindex="2">
									<option>-请选择班级-</option>
								</select>	
							</td>
						</tr>
						<tr class="tdbg">
							<td align="center">学期</td>
							<td>
								<select id="s3" name="xq" style="width:180px" tabindex="3">
									<option>-请选择学期-</option>
								</select>
							</td>
					
						</tr>
						<tr class="tdbg">
							<td align="center">课程</td>
							<td><input name="kc" type="text" size="30"></td>
						</tr>
						<tr class="tdbg">
							<td align="center">任课</td>
							<td><select name="admin_id" style="width:180px" tabindex="3">
									<option value="">-请选择老师-</option>
									<%
									sql="Select id,username from admin"
									rs.open sql,conn,1,1
									Do While not rs.eof
									response.write "<option value="&rs(0)&">"&rs(1)&"</option>"
									rs.movenext
									loop
									rs.close
									%>
								</select>
								</td>
						</tr>

						<tr align="center" class="tdbg">
							<td colspan="2">
								<input name="kind" type="hidden" value="3">
								<input type="submit" name="Submit" value="提交">&nbsp;
								<input type="reset" name="Submit2" value="清除">
							</td>
						</tr>
						<tr class="tdbg">
							<td colspan="2"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
						<tr class="tdbg">
							<td width="14%" align="center">说明</td>
							<td width="86%"> 1.填入相对应的份数,系统自动生成为您方便添加课程。</td>
						</tr>
						<tr class="tdbg">
							<td> </td>
							<td> 2.添加课程只需选择对应的年级就行了,不必理会各个班。</td>
						</tr>
						<tr class="tdbg">
							<td> </td>
							<td>3.请注意信息的完整性,提交后请自行到课程列表进行核对。</td>
						</tr>
					</table>
				</td>
			</tr>
				</form>
		</table>


				</td>
				</tr>
<%end if%>


<%if request.querystring("kind")="admin" Then
Call admin_yz(4)
%>
				
				<tr>
				<td align="center" colspan=9 >
				<br><br>
					<form name="form1" method="post" action="addu.asp">
						<br>
							<table width="50%" border='0' align='center' cellpadding='2' cellspacing='1' class='border'>
								<tr align="center"  class="title">
								 <td colspan="3"> 添加管理员 </td>
								</tr>
					<tr class="tdbg"><td width="27%" align="center">等  级</td>
						 <td width="73%" colspan="2">
						 <select name="qx">
							<option value="1">普通管理员</option>
							<option value="2">任课教师</option>
							<option value="3">班主任</option>
							<option value="4">系统管理员</option>	
						 </select></td></tr>
					<tr class="tdbg"><td width="27%" align="center"> 用户名 </td>
						<td width="73%" colspan="2"><input name="username" type="text" size="30"></td>
					</tr>
					<tr class="tdbg">
					  <td align="center"> 密  码 </td>
					  <td colspan="2"><input name="password" type="password" size="30">
					  
					  </td>
					</tr>
					<tr align="center" class="tdbg">
					  <td colspan="3"><input type="hidden" name="kind" value="0">
					  <input type="submit" name="Submit" value="提交">&nbsp;
						<input type="reset" name="Submit2" value="清除"></td>
					  </tr>
					<tr class="tdbg">
					  <td colspan="3"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
						<tr class="tdbg">
						  <td width="13%" align="center">说明</td>
						  <td width="87%">&nbsp;1.如果您输入的密码为空,系统将自动以用户名作为密码。</td>
						</tr>
						<tr class="tdbg">
						  <td> </td>
						  <td>&nbsp;2.添加完毕之后,请自行确认您所输入的信息。</td>
						</tr>
					  </table></td>
					  </tr>
				  </table>
				</form>
				</td>
				</tr>
				
<%end If
if request.querystring("kind")="user" Then
Call admin_yz(2)

%>
<SCRIPT LANGUAGE = JavaScript>

var s=["lj","bj"];
var opt0 = ["-请选择年级-","-请选择班级-"];
function setup()
{
 for(i=0;i<s.length-1;i++)
 document.getElementById(s[i]).onchange=new Function("change("+(i+1)+")");
 change(0);
}
//-->
</SCRIPT>
				<tr>
				<td align="center">
				<%Call admin_xh_top("添加学生相关信息")%>
				  <table width="98%" border='0' align='center' cellpadding='2' cellspacing='1' class='border'>
					<form name="form1" method="post" action="addu.asp">
					  <tr class="tdbg">
					  <td width="27%" align="center"> [ <span style="color: #FF0000">年级</span> ]</td>
					  <td width="73%">
						<select id="s1" name="lj" style="width:180px" tabindex="1">
							<option>-请选择年级-</option>
						</select></td>
					</tr>
					<tr class="tdbg">
					  <td width="27%" align="center"> [ <span style="color: #FF0000">班级</span> ]</td>
					  <td width="73%">
						<select id="s2" name="bj" style="width:180px" tabindex="2">
							<option>-请选择班级-</option>
						</select>
					  </td>
					</tr>
					<tr class="tdbg">
					  <td align="center"> [ <span style="color: #FF0000">学号</span> ] </td>
					  <td><input name="xh" type="text" size="30"></td>
					</tr>
					<tr class="tdbg">
					  <td align="center"> 姓名 </td>
					  <td><input name="user" type="text" size="30"></td>
					</tr>
					<tr class="tdbg">
					  <td align="center">密码</td>
					  <td><input name="mm" type="text" size="30"></td>
					</tr>
					<tr class="tdbg">
					  <td align="center"> 性别 </td>
					  <td><select name="sex">
					  <option>男</option><option>女</option></select></td>
					</tr>
					<tr class="tdbg">
					  <td align="center"> 住址 </td>
					  <td><input name="addr" type="text" size="30"></td>
					</tr>
					<tr class="tdbg">
					  <td align="center"> 邮编  </td>
					  <td><input name="yb" type="text" size="30"></td>
					</tr>
					<tr align="center" class="tdbg">
					  <td colspan="2"><input type="hidden" name="max" value="1">
										  <input type="hidden" name="kind" value="1">
										  <input type="submit" name="Submit" value="提交">&nbsp;
						<input type="reset" name="Submit2" value="清除"></td>
					  </tr>
					<tr class="tdbg">
					  <td colspan="2"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
						<tr class="tdbg">
						  <td width="13%" align="center">说明</td>
						  <td width="87%">&nbsp;1.如果您输入的密码为空,系统将自动以学号作为密码。</td>
						</tr>
						<tr class="tdbg">
						  <td> </td>
						  <td>&nbsp;2.添加完毕之后,请自行确认您所输入的信息。</td>
						</tr>
					  </table></td>
					  </tr>
					  </form>
				  </table>
				
				</td>
				</tr>
				<%end if%>


<%if request.querystring("kind")="lj" Then
Call admin_yz(4)

if request.querystring("type")="del" Then

	Call del("id="&request.querystring("id"),"ljb")				'删除年级项目
	set deltable=conn.execute("delete from cj_"&request.querystring("lj")&"")			'删除年级所有成绩
	set deltable=conn.execute("DROP TABLE cj_"&request.querystring("lj")&"")			'删除年级表
	sql="select id from bjb where ljb_id="&request.querystring("id")				'输出相应年级下的班级
	rs.open sql,conn,1,1
	Do While Not rs.eof
	Call del("ljbj_id="&rs(0),"kcb")				'删除相应班级下所有课程项目
	Call del("ljbj_id="&rs(0),"cj_mc")				'删除相应班级中学生成绩总分名次等信息
	rs.movenext
	Loop
	Call del("ljb_id="&request.querystring("id"),"bjb")				'删除相应年级下的班级
	rs.Close
End If
page = CLng(request("page"))                            '利用CLng函数把page值转换为Long型
If page="" Then page=1
judge=request("judge")
judge2=request("judge2")
judge3=0
Call admin_lx_top("年级信息管理")
%>
				<tr valign="top">
				<td align="center"><br>
				<div id=boysoft style=" LEFT: 200px; POSITION: absolute; TOP: 100px; VISIBILITY: hidden; WIDTH: 400px; Z-INDEX: 1">
				<table bgcolor="#ffffff" width="80%" border='0' align='center' cellpadding='2' cellspacing='1' class='border'>
				<form name="form1" method="post" action="addu.asp">
				  <tr align="center"  class="title">
					<td height="32" colspan="2">添加年级</td>
				  </tr>
				  <tr class="tdbg">
					<td width="15%" align="center">年级</td>
					<td width="55%"><input type="text" name="lj" size="30"></td>
				  </tr>
				  
				  <tr align="center" class="tdbg">
					<td colspan="2">
					<input type="hidden" name="kind" value="5">
					<input type="submit" name="Submit" value="提交">&nbsp;
					  <input type="reset" name="Submit2" value="清除">&nbsp;
					  <input type="button" onclick="javascript:toExit('hide','boysoft')" name="Submit2" value="关闭"></td>
					</tr>
				</form>
				</table>
				</div>
				<table width="98%" border='0' align='center' cellpadding='2' cellspacing='1' class='border'>
					 <tr class="title">
					 <td colspan="3"><b>操作:    <input type="button" onclick="javascript:toExit('show','boysoft')" name="Submit2" value="添加新年级"></td>
					 </tr>
					 <tr class="title" align='center'>
					 <td width=20><b>ID</td>
					 <td width=270><b>年级</td>
					 <td width=60><b>操作</td>
					 </tr>

					 <!-- #include file="../conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")

    sql="select * from ljb"
rs.Open sql,conn,1,1
if not (rs.EOF or rs.BOF) then
	rs.MoveFirst
	rs.PageSize = 12  '每页显示的条数
	If page < 1 Then page = 1 
	If page > rs.PageCount Then page = rs.PageCount  
	rs.AbsolutePage = page
For ipage = 1 To rs.PageSize
%>
<tr class="tdbg"  onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'">
	<td><%=rs("ID")%></td>
	<td><a href='admin_add.asp?kind=bj&lj=<%=rs("lj")%>'><%=rs("lj")%></a></td>
	<td><a href="updata.asp?kind=lj&id=<%=rs("id")%>">修改</a>  <a href="admin_add.asp?kind=lj&type=del&lj=<%=rs("lj")%>&id=<%=rs("id")%>" onclick="return confirm('确定要删除此年级吗?将会删除该年级下的所有信息(包括该年级下的所有班级,类别,学号,成绩,统计等信息)!');">删除</a></td>
</tr>
  <%
	rs.MoveNext      
	If rs.EOF Then Exit For   
	Next   
      %>
	</table>
	<%Call pageinfo_b("admin_add.asp?kind=lj","&")
	Else
	 %>
	<tr><td colspan='3'>没有任何信息</td></tr>
<%
	End If %>			
					 
	</td>
</tr>

				<%
				
				
				end if%>

<%if request.querystring("kind")="post" Then
Call admin_yz(4)
%>
<!--#include file="../inc/Ubb.asp"-->
<!--#include file="../inc/Ubbadd.asp"-->
<!--#include file="../inc/Ubbshow.asp"-->
<SCRIPT LANGUAGE="JavaScript">
<!-- Begin
maxLen = 255;
function checkMaxInput(form) {
if (form.content.value.length > maxLen)
form.content.value = form.content.value.substring(0, maxLen);
else document.all.bodyLen.innerText=form.content.value.length;
}
//  End -->
</script>
	<tr valign="top">
		<td align="center">
			<form name="form1" action="addu.asp" method="post">
				<table border='0' align='center' cellpadding='2' cellspacing='1' class='border'>
					<tr align="center"  class="title">
						<td height="31" colspan=2>添加公告</td>
					</tr>
					<tr class="tdbg">
						<td width="60">新闻标题:</td>
						<td><input name="title" type="text" size="40"></td>
					</tr>
					<tr class="tdbg">
						<td width="60">添加人:</td>
						<td><input name="add_name" type="text" size="40" value="<%=session("username")%>"></td>
					</tr>
					<tr class="tdbg">
						<td colspan=2><%call ubbshow()%><Br><textarea name="content" onKeyDown="checkMaxInput(this.form)" onKeyUp="checkMaxInput(this.form)"  cols="50" rows="6" style="overflow-y:auto;height:120"></textarea>
						</td>
					</tr>
					<tr class="tdbg">
						<td colspan=2 align=center><font color="#FF0000"><span id="bodyLen">0</span>&lt;</font>255
							<input type="hidden" name="kind" value="7">
							<input type="submit" value="提交" name="B1">
							<input type="reset" value="重置" name="B2">
						</td>
					</tr>
				</table>
			</form>
		</td>
	</tr>
				<%end if%>


<%if request.querystring("kind")="xq" Then
Call admin_yz(4)
%>
				<tr valign="top">
				<td align="center" width="70%">
<%Call admin_lx_top("考试类别信息管理")%>
<Br>
				<table width="98%" border='0' align='center' cellpadding='2' cellspacing='1' class='border'>
					<tr class="tdbg"><td colspan="3">
						<div class="manager_menu">
						操作:
							<a href="javascript:showIntro('boysoft');">&nbsp添加新类别 </a>&nbsp;&nbsp;
						</div></td></tr>
					</table>

					<table bgcolor="#ffffff" id="boysoft" 
style="display: none" width="98%" border='0' align='center' cellpadding='2' cellspacing='1' class='border'>
				<form name="form1" method="post" action="addu.asp">
				  <tr align="center" class="title">
					<td height="32">添加学期</td>
				  </tr>
				  <tr class="tdbg">
					<td width="15%" align="center">学期:&nbsp;&nbsp;&nbsp;&nbsp;<input type="text" name="xq" size="30" maxlength="16">&nbsp;&nbsp;<input type="submit" name="Submit" value="提交">&nbsp;
					  <input type="reset" name="Submit2" value="清除">&nbsp;
					  <input type="button" onclick="javascript:showIntro('boysoft');" name="Submit2" value="隐藏"><br><br>·如:05-06 上学期 或 06年英语四级考试</td>
					<input type="hidden" name="kind" value="4">
					</tr>
					</form>
				</table>


				<table width="98%"  id="boysoft1" border='0' align='center' cellpadding='2' cellspacing='1' class='border'>
					<tr class="title" align='center'>
						<td width="30"><b>ID</td>
						<td width="680"><b>类别</td>
						<td width="62"><b>操作</td>
					</tr>
					 <!-- #include file="../conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")

    sql="select * from xqb"
rs.Open sql,conn,1,1
do while not rs.eof
%>
<tr class="tdbg" onmouseout="this.style.backgroundColor=''" onmouseover="this.style.backgroundColor='#BFDFFF'">
	<td align='center'><%=rs("id")%></td>
	<td><%=rs("xq")%></td>
	<td align='center'><a href="updata.asp?kind=xq&id=<%=rs("id")%>">修改</a>&nbsp;<a href="#" onclick="return confirm('类别将无法删除,如有需要请进行修改类别名称');">删除</a></td></tr>
<%
rs.movenext
loop
rs.Close
set rs=nothing
set conn=nothing
%> 
			</table>
				
					 
				</td>
				</tr>

				<%end If%>

			</table>

			

<!-- #include file="../inc/copyright.asp" -->