📄 zhfx.asp

📁 学生成绩管理是学校管理的重要组成部分。成绩不仅关系到学生成绩升迁

💻 ASP

字号:



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

key = request.form("key")
if key="" then
 key=request("key")
end if

if  key="" then
sql="SELECT * from zybjmc Order by s" 
end if

sql="SELECT * from zybjmc where s like '%"&key&"%' or zybj like '%"&key&"%' Order by s" 

set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
total=rs.recordcount

%>








<html>
<head>
<title>成绩查询－－龚文生</title>
</head>


<body bgcolor="#FFFFFF" text="#000000" background="bg01.gif" topmargin="0" leftmargin="0">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td>
          

          <div align="center"><font color=red size="6" face="隶书">请选择班级</font></div>    
    <center>
    
  
    
    
<form name="form2" method="post" action="zhfx.asp">
         <font size="2">请输入系或班级的名称<br>
                   </font>
                   <input type="text" name="key" size="30"><p>
          <input type="submit" name="Submit2" value="搜索或刷新"><font size="2">
          </font>
       
</form>

</center>









  

        <div align="center"><b><font color="#0066FF" size="2">共找到<font color=red><%=total%></font>条符合您要求的班级 
        </font></b></div>
    </td>
  </tr>
</table>



<center>

	<table border=1 cellpadding=1 cellspacing=1>
    <tr bgcolor=black style='color:white'>
    
    <td align=center style="font-size: 12px">编号</td>
   
    <td align=center style="font-size: 12px">系</td>

    <td align=center style="font-size: 12px">班级名称</td>
    
    <td align=center style="font-size: 12px">选择班级</td>

  



<%
do while not rs.eof
i=i+1
s=rs("s")
zybj=rs("zybj")
bjbh=rs("bjbh")
bjbh="b"+cstr(bjbh)



%>

  
  
  
<% 
 If sColor = "silver" Then
		sColor = "#cccccc"
	Else
		sColor = "silver"
	End If
   
	Response.Write("<tr bgcolor='" & sColor & "'>")	 
%> 
	 

  
  
  
  
  
  
  
    
    <td align=center style="font-size: 12px"><font color="red"><%=i%></font>　</td>
        <td align=center style="font-size: 12px"><%=s%>　</td>
    <td align=center style="font-size: 12px"><%=zybj%>　</td>
    
    <td align=center style="font-size: 12px"><a href=bmxqfx.asp?bjbh=<%=bjbh%>&zybj=<%=zybj%>><font color="green">选中此班</font></a></td>
    </tr>
   

    
    
    
 <%
rs.movenext
loop

Response.Write("</table>") 
Response.Write("</center>")

rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -