admin_searchach.asp

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

classid=Liststatclass(stat)                                                                                                                                                                             
%>                                                                                       
  <TR>                                                                                                                                                                                                                                                                 
                                                                                                                                                                                                                                                                                                     
          <TD vAlign=center align=middle                                                                                                                                                                                                                                                                                                      
            bgColor=#ffffff><%=rs("a_no")%></TD>                                                                                                                                                                                                                                                                                                     
          <TD vAlign=center align=middle                                                                                                                                                                                                                                                                                                      
            bgColor=#ffffff><%=rs("a_name")%></TD>                                                                                                                                                                                                                                                                                                     
           <% For i = 4 to RS.Fields.Count - 1  %>                                                                                                                                                                                                                                                                                                      
          <TD vAlign=center align=middle                                                                                                                                                                                                                                                                                                      
            bgColor=#ffffff><%=rs("st")%> <% = RS(i) %>                                                                                                                                                                                        
            </TD>  <% Next %>                                                                        
                                                                                          
               <TD vAlign=center align=middle                                                                                                                                                                                                                                                                                                      
            bgColor=#ffffff><%=j%></TD>                                                                                 
            </TR>                                                                                                                                                                                                                                                                              
            <%rs.movenext                                                                                                                                                                                                                                                                                                                       
                    count=count+1                  
                    j=j+1                                                                                                                                                                                                                                                                                                                    
                    loop%>                                                                                                                                                                                                                                                                                               
                                                                                                                                                                                                                                                                        
            </TBODY></TABLE>                                                                          
             <TABLE cellSpacing=0 borderColorDark=#ffffff cellPadding=0 width=630                                                                                                                                                                                                                                                                  
      borderColorLight=#3a9ad3 border=1>                                                                                                                                                                                                                                                                 
        <TBODY>                                                                                                                                                                                                                                                                 
                                                                                     
  <TR>                                                                                 
                <TD vAlign=center align=middle                                                                                                                                                                                                                                                                  
          bgColor=#ffffff>&nbsp;&nbsp;</TD>                                                                                                            
                                                                                                                     
       </TBODY></TABLE>                                                                                    
                                                                          
       <BR>                                                                                     
      <TABLE cellSpacing=0 borderColorDark=#ffffff cellPadding=0 width=630                                                                                                                                                                                                                                                                  
      borderColorLight=#3a9ad3 border=1>                                                                                                                                                                                                                                                                 
        <TBODY>                                                                                                                                                                                                                                                                 
                                                                                          
                                                                                                                                                                                                                                                                                                                            
        <TR>                                                                                                                                                                                                                                                                                                                             
          <TD vAlign=center align=left bgColor=#ffffff colspan="7"><a style="text-decoration: none" href="admin_searchach.asp?page=<%=page-1%>"><font color="#000000">[上页]</font></a><a style="text-decoration: none" href="admin_searchach.asp?page=<%=page+1%>"><font color="#000000">[下页]</font></a>共<%=rs.pagecount%>页                                                                                                                                                                                                                                                                                                                                                                                                          
（第<font color=#ff0000><%=page%></font>页）共有记录<%=AllGb%>条</TR></TBODY></TABLE><BR>                                                                                                                                                                                                                                                                                                                                                                                                                                                  
                                                                                                                                                                                                                                                                                                                                                                                                                                                 
      <TABLE width="70%" border=0>                                                                                                                                                                                                                                                                                                                                                                                                                                                  
        <TBODY>                                                                                                                                                                                                                                                                                                                                                                                                                                                  
        <TR>                                                                                                                                                                                                                                                                                                                                                                                                                                                  
          <TD align=right>公告消息</TD></TR>                                                                                                                                                                                                                                                                                                                                                                                                                                                  
        <TR>                                                                                                                                                                                                                                                                                                                                                                                                                                                  
          <TD align=right>留言&nbsp;&nbsp;</TD></TR></TBODY></TABLE></TD>                                                                                                                                                                                                                                                                                                                                                                                                                                                  
    <TD vAlign=top width="5%">                                                                                                                                                                                                                                                                                                                                                                                                                       
      </TD></TR></TBODY></TABLE>                                                                                     
                                                                                     
<%                                                                                                                                                                                                                                                                                                                                                                                                                           
end if                                                                                                                                                                                                                                                                                                                                                                                                                           
conn.close%>                                                                                      
<!--#include file="down.inc"-->                                                                                                                                                                                                                                                                                                                                                                                                                                                   
 </BODY>                                                                                                                                                                                                                                                                                                                
<%elseif b1="确定" then                                                                                                                                                                                                                                                                                                              
years=Request.Form("years")                                                                                                                                                                                                                                                                                                            
stat=Request.Form("stat")                                                                                                                                                                                                                                                                                                           
classes=Request.Form("classes")                                                                                                                                                                                                                                                                                                      
Session("years") = years                                                                                                                                                                                                                                                                                                          
Session("stat") = stat                                                                                                                                                                                                                                                                                 
Session("classes") = classes                                                                                                                                                                                                                                                                       
If classes="" Then Response.write "<script>alert(""没有选择班级！"");history.back();</script>"                                                                                                                                                                                                                                                                                                            
Response.write "<script>location.href('admin_searchach.asp');</script>"                                                                                                                                                                                                                                                                                                             
%>                                                                                                                                                                                                                                                                                               
                                                                                                                                                                                                                                                     
<%elseif b1="恢复" then                                                                                                                                                                                                                                                                                                              
s_class = request("s_class")                                                                                                                                                                                                                                            
If s_class="" Then Response.write "<script>alert(""没有选择班级！"");history.back();</script>"                                                                                                                                                                                                                                                                                                            
Session("years")=""                                                                                                                         
Session("stat")=""                                                                                                                                                                                                                                                                                           
Response.write "<script>location.href('admin_searchach.asp');</script>"                                                                                                                                                                                                                                                                                                             
%>                                                                                                                                                                                                                                                                                          
<%elseif b1="删除" then                                                                                                                                                                                                                                                                                                                                                                       
a_id=request("a_id")                                                                                              
                                                                                                 
sql="delete from achievement where a_id="&a_id                                                                                                    
conn.execute sql                                                                                             
Response.write "<script>alert('删除成功！点确定继续......');location.href('admin_searchach.asp');</script>"                                                                                                   
                                                                                            
                                                                                                                                                                                                                                                  
end if                                                                                                                                                                                                                                                                                                                                                                               
%>