我在用ASP编写网页时遇到的问题
要求是
编写如下的统计报表：
统计出所有的不及格学生及其课程；
统计汇总出每个班级的不及格率；
统计出成绩在 0-59、60-75、76-85、86-95、96-100 成绩段的每段百分比
我想问1下应该如何统计不及格学生
cj是成绩表 含有成绩cj 学号xh 课程ID kcid
kc是课程表 课程ID kcid 课程名称 kcmc
XS是学生表 学号xh 姓名xm
我自己现在编写的程序是
<%
dim xh,xm,xb,bj,nj,zy,cj,cjid,kcid,kcmc,jsxm
sqlstr1="select * from cj "
Set rs1 = Server.Createobject("ADODB.recordset")
rs1.open sqlstr1,conn,1,3
if not rs1.eof then
count=0
do while not (rs1.eof or rs1.bof) and count<rs1.PageSize
cj=rs1("cj")
if cj<60 then
cjid=rs1("cjid")
kcid=rs1("kcid")
xh=rs1("xh")
sqlstr2="select * from kc where kcid="&kcid
Set rs2 = Server.Createobject("ADODB.recordset")
rs2.open sqlstr2,conn,1,3
kcmc=rs2("kcmc")
jsxm=rs2("jsxm")
sqlstr="select * from xs where xh='"&xh&"'"
Set rs = Server.Createobject("ADODB.recordset")
rs.open sqlstr,conn,1,3
xm=rs("xm")
xb=rs("xb")
bj=rs("bj")
nj=rs("nj")
zy=rs("zy")
%>
<tr>
<td><%=rs1("xh")%></td>
<td><%=rs("xm")%></td>
<td><%=rs("bj")%></td>
<td><%=rs("zy")%></td>
<td><%=rs2("kcmc")%></td>
<td><%=rs2("jsxm")%></td>
<td><%=rs1("cj")%></td>
</tr>
<%
rs1.movenext
count=count+1
loop
else
response.end
end if
end if
%>
