admin_test.asp

汕头育新学校学籍与成绩管理平台是集学籍管理与成绩管理于一体的网络互动平台。功能强大、使用简单、高效速成、安全方便

			<TABLE cellSpacing=4 cellPadding=0 width=521 align=center bgColor=#fff7f7 
border=0><form action="admin_test.asp" method="POST">
  <TBODY>
  <TR>
    <TD width=521>
      <DIV align=center>
      <TABLE cellSpacing=0 cellPadding=0 width=400 border=0>
        <TBODY>
        <TR bgColor=#ffe8e8>
          <TD class=p14 colSpan=4 height=23>
            <DIV align=center><STRONG>考试信息</STRONG></DIV></TD></TR>
             <TR>            
          <TD class=p12 vAlign=top height=23>&nbsp;&nbsp;班    级</TD>                                                                                                                       
          <TD colSpan=3> &nbsp;                                                                                                          
 <%                                                                                                          
					sql = "select c_id,c_name from class order by c_id desc"                                                                                                          
					set rs = conn.execute(sql)                                                                                                          
					if rs.eof and rs.bof then                                                                                                          
						response.write "请先添加班级！"                                                                                                          
						response.end                                                                                                          
					else                                                                                                          
					%>                                                                                                          
 <select class=txBox_p id=st_class   maxLength=30 name=st_class>                                                                                                           
                                                                                                                 
          <%do while not rs.eof%>                                                                                                          
          <option value="<%=rs(0)%>"><%=(rs(1))%></option>                                                                                                          
          <%                                                                                                          
        				rs.movenext                                                                                                          
       					loop                                                                                                          
						end if                                                                                                          
       					rs.close                                                                                                          
        				set rs = nothing                                                                                                          
						%>                                                                                                          
        </select>                                                                                                          
 <SPAN class=pinkstar>＊(选择班级!)&nbsp;&nbsp;<a href="admin_test.asp?Action=course">增加课程</a></SPAN>&nbsp;&nbsp;                                                                                                                           
            &nbsp;</TD></TR>                                           
                                                                                                                                 
        <TR>                                                                                                                    
          <TD class=p12 vAlign=top height=23>&nbsp;&nbsp;考试名称</TD>                                                                                                                    
          <TD colSpan=3><INPUT class=txBox_p id=st_name                                                                                                                     
            maxLength=30 size=24 name=st_name> &nbsp;<SPAN                                                                                                                            
            class=pinkstar>＊</SPAN>&nbsp;&nbsp;<SPAN                                                                                                                            
          class=gray_text></SPAN></TD></TR>                                                                                                                       
                                                                                                                         
                                                                                                                              
          <TD height=10></TD>                                                                                                                         
          <TD colSpan=3></TD></TR>                                                                                                               
                                                                                                                                 
        <TR vAlign=top>                                                                                                                         
          <TD colSpan=4 height=26>                                                                                                                         
            <DIV align=center><INPUT class=Button_p type=submit name=Submit value="确 定">                                                                                                                          
<INPUT class=Button_p type=reset value="重 置"> <INPUT type=hidden                                                                                                                          
            name=lm> </DIV></TD></TR>
             <TR>                                    
                                    
          <TD class=p12 vAlign=center align=left                              
            >&nbsp;&nbsp;编号&nbsp;&nbsp;</TD>                                   
           <TD class=p12 vAlign=center align=left                                    
            >&nbsp;&nbsp;考试名称:&nbsp;&nbsp;</TD>
             <TD class=p12 vAlign=center align=left                                    
            >&nbsp;&nbsp;班级:&nbsp;&nbsp;</TD>
             <TD class=p12 vAlign=center align=left                                    
            ><SPAN class=pinkstar>[</SPAN>&nbsp;&nbsp;<SPAN                                                                                           
            class=gray_text>删除考试</SPAN>&nbsp;&nbsp;<SPAN class=pinkstar>]</SPAN></TD>
             
        </TR>       
             
            <%                                                                         
					sql = "select st_id,st_name,st_class from stat where st_del=False order by st_class desc"                                                                         
					set rs = conn.execute(sql)  
					st_name=rs("st_name") 
					                                                                      
					if rs.eof and rs.bof then                                                                         
						response.write "请先添加考试名称！"                                                                         
						response.end                                                                         
					else                                                                         
					%>                                                  
					<%do while not rs.eof%>
					<%st_class=rs("st_class")%>
					 <TR>                                    
                                    
          <TD class=p12 vAlign=center align=left                              
            >&nbsp;&nbsp;<%=rs(0)%>&nbsp;&nbsp;</TD>                                   
           <TD class=p12 vAlign=center align=left                                    
            >&nbsp;&nbsp;<%=(rs(1))%>&nbsp;&nbsp;</TD>
             <TD class=p12 vAlign=center align=left                                    
            >&nbsp;&nbsp;<%=Listclass(st_class)%>&nbsp;&nbsp;</TD>
             <TD class=p12 vAlign=center align=left                                    
            ><SPAN class=pinkstar>[</SPAN>&nbsp;&nbsp;<SPAN                                                                                           
            class=gray_text><a href="admin_test.asp?st_id=<%=(rs(0))%>">删除考试</a></SPAN>&nbsp;&nbsp;<SPAN class=pinkstar>]</SPAN></TD>
             
        <TR>                                                                                               
                <%                                                                         
        				rs.movenext                                                                         
       					loop                                                                         
						end if                                                                         
       					rs.close                                                                         
        				set rs = nothing                                                                         
						%>     
           </TBODY></TABLE></DIV></TD></TR></TBODY></FORM></TABLE>                                                                                                              
			</DIV></TD></TR>                                                                                                                          
        <TR>                                                                                                                          
          <TD class=tdBott_p>对汕头育新学校有任何意见和问题，<a href="../note.asp">请给我们留言</a>。</TD></TR></TBODY></TABLE>                  </TD></TR></TBODY></TABLE>                                                                                                             
                                                                                              
        <BR>                                                                                                                                      
                                                                                                                                    
                                                                                                                                      
  <br>                                                                                                                            
<%                                                                                                                            
                                                                                                                        
End Select                                                                                                                            
                                                                                                                          
                                                                                                                         
%>                                                                                                                                           
                          
<!--#include file="down.inc"-->                             
</BODY></HTML>