📄 bjmfx.asp
字号:
<%@ language=vbscript %>
<!--#include file="conn.asp"-->
<%
zfwj=request("zfwj")
xq=request("xq")
mf=request("mf")
bjbh= request("bjbh")
mzxs=request("mzxs1")
mc=request("mzxs")
sql="SELECT * from "&bjbh&" Order by "&mzxs&" desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,3
sqlmax="SELECT max("&mzxs&") from "&bjbh&""
set rsmax=server.createobject("adodb.recordset")
rsmax.Open Sqlmax,conn,1,1
sqlmin="SELECT min("&mzxs&") from "&bjbh&" where "&mzxs&">0"
set rsmin=server.createobject("adodb.recordset")
rsmin.Open Sqlmin,conn,1,1
sqlavg="SELECT avg("&mzxs&") As pjf from "&bjbh&""
set rsavg=server.createobject("adodb.recordset")
rsavg.Open Sqlavg,conn,1,1
sqljg="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">="&mf&"*.6"
set rmzxsg=server.createobject("adodb.recordset")
rmzxsg.Open Sqljg,conn,1,1
sqljg140="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">=140"
set rmzxsg140=server.createobject("adodb.recordset")
rmzxsg140.Open Sqljg140,conn,1,1
sqljg130="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">=130 and "&mzxs&"<140"
set rmzxsg130=server.createobject("adodb.recordset")
rmzxsg130.Open Sqljg130,conn,1,1
sqljg120="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">=120 and "&mzxs&"<130"
set rmzxsg120=server.createobject("adodb.recordset")
rmzxsg120.Open Sqljg120,conn,1,1
sqljg110="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">=110 and "&mzxs&"<120"
set rmzxsg110=server.createobject("adodb.recordset")
rmzxsg110.Open Sqljg110,conn,1,1
sqljg100="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">=100 and "&mzxs&"<110"
set rmzxsg100=server.createobject("adodb.recordset")
rmzxsg100.Open Sqljg100,conn,1,1
sqljg90="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">=90 and "&mzxs&"<100"
set rmzxsg90=server.createobject("adodb.recordset")
rmzxsg90.Open Sqljg90,conn,1,1
sqljg80="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">=80 and "&mzxs&"<90"
set rmzxsg80=server.createobject("adodb.recordset")
rmzxsg80.Open Sqljg80,conn,1,1
sqljg70="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">=70 and "&mzxs&"<80"
set rmzxsg70=server.createobject("adodb.recordset")
rmzxsg70.Open Sqljg70,conn,1,1
sqljg60="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">=60 and "&mzxs&"<70"
set rmzxsg60=server.createobject("adodb.recordset")
rmzxsg60.Open Sqljg60,conn,1,1
sqljg50="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">=50 and "&mzxs&"<60"
set rmzxsg50=server.createobject("adodb.recordset")
rmzxsg50.Open Sqljg50,conn,1,1
sqljg40="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">=40 and "&mzxs&"<50"
set rmzxsg40=server.createobject("adodb.recordset")
rmzxsg40.Open Sqljg40,conn,1,1
sqljg30="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">=30 and "&mzxs&"<40"
set rmzxsg30=server.createobject("adodb.recordset")
rmzxsg30.Open Sqljg30,conn,1,1
sqljg20="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">=20 and "&mzxs&"<30"
set rmzxsg20=server.createobject("adodb.recordset")
rmzxsg20.Open Sqljg20,conn,1,1
sqljg10="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">=10 and "&mzxs&"<20"
set rmzxsg10=server.createobject("adodb.recordset")
rmzxsg10.Open Sqljg10,conn,1,1
sqljg0="SELECT count("&mzxs&") As pjf from "&bjbh&" where "&mzxs&">0 and "&mzxs&"<10"
set rmzxsg0=server.createobject("adodb.recordset")
rmzxsg0.Open Sqljg0,conn,1,1
if rs.eof then
response.write"<script language='javascript'>"
response.write"alert('没有符合您要求的记录！');"
response.write"history.go(-1);"
response.write"</script>"
response.end
end if
total=rs.recordcount
zybj=rs("zybj")
%>
<html>
<head>
<title>龚文生</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="config.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000" background="bg01.gif">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td>
<div align="center"><b><font color=red><font face="华文行楷" size="6">
<%=zybj%></font></font></b></div>
<div align="center"><b>第<font color=red><%=xq%></font>学期<font color=red><%=mc%></font>成绩分析</b></div>
<div align="center"><b><font color="#0066FF">共有<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>名次</td>
<td align=center>学号</td>
<td align=center>姓名</td>
<td align=center>性别</td>
<td align=center>详情</td>
<td align=center><%=mc%> </td>
<%
do while not rs.eof
i=i+1
xh=rs("xh")
xm=rs("xm")
xb=rs("xb")
if mzxs="fs10" then
if rs("fs10")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs11" then
if rs("fs11")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs12" then
if rs("fs12")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs13" then
if rs("fs13")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs14" then
if rs("fs14")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs15" then
if rs("fs15")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs16" then
if rs("fs16")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs17" then
if rs("fs17")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs18" then
if rs("fs18")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs19" then
if rs("fs19")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs110" then
if rs("fs110")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs111" then
if rs("fs111")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs112" then
if rs("fs112")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs113" then
if rs("fs113")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs114" then
if rs("fs114")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs115" then
if rs("fs115")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs116" then
if rs("fs116")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs117" then
if rs("fs117")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs118" then
if rs("fs118")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs119" then
if rs("fs119")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs20" then
if rs("fs20")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs21" then
if rs("fs21")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs22" then
if rs("fs22")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs23" then
if rs("fs23")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs24" then
if rs("fs24")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs25" then
if rs("fs25")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs26" then
if rs("fs26")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs27" then
if rs("fs27")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs28" then
if rs("fs28")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs29" then
if rs("fs29")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs120" then
if rs("fs120")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs121" then
if rs("fs121")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs122" then
if rs("fs122")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs123" then
if rs("fs123")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs124" then
if rs("fs124")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs125" then
if rs("fs125")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs126" then
if rs("fs126")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs127" then
if rs("fs127")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs128" then
if rs("fs128")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs129" then
if rs("fs129")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs30" then
if rs("fs30")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs31" then
if rs("fs31")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs32" then
if rs("fs32")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs33" then
if rs("fs33")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs34" then
if rs("fs34")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs35" then
if rs("fs35")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs36" then
if rs("fs36")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs37" then
if rs("fs37")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs38" then
if rs("fs38")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs39" then
if rs("fs39")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs130" then
if rs("fs130")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs131" then
if rs("fs131")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs132" then
if rs("fs132")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs133" then
if rs("fs133")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs134" then
if rs("fs134")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs135" then
if rs("fs135")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs136" then
if rs("fs136")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs137" then
if rs("fs137")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs138" then
if rs("fs138")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs139" then
if rs("fs139")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs40" then
if rs("fs40")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
if mzxs="fs41" then
if rs("fs41")=0 then
kmzxss=0
else
kmzxss=1
end if
end if
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -