main.asp

自己看

                <td width="27"> 
                  <div align="center"><font size="2"><%=rs("biological")%></font></div>
                </td>
                <td width="26"> 
                  <div align="center"><font size="2"><%=rs("mingci7")%></font></div>
                </td>
                <td width="29"> 
                  <div align="center"><font size="2"><%=rs("politics")%></font></div>
                </td>
                <td width="28"> 
                  <div align="center"><font size="2"><%=rs("mingci8")%></font></div>
                </td>
                <td width="28"> 
                  <div align="center"><font size="2"><%=rs("history")%></font></div>
                </td>
                <td width="28"> 
                  <div align="center"><font size="2"><%=rs("mingci9")%></font></div>
                </td>
                <td width="30"> 
                  <div align="center"><font size="2"><%=rs("geography")%></font></div>
                </td>
                <td width="26"> 
                  <div align="center"><font size="2"><%=rs("mingci10")%></font></div>
                </td>
                <td width="46"> 
                  <div align="center"><font size="2"><%=rs("language")+rs("mathe")+rs("english")+rs("physics")+rs("chemical")+rs("biological")+rs("politics")+rs("history")+rs("geography")%></font></div>
                </td>
                <td width="32"> 
                  <div align="center"><font size="2"><%=rs("mingci4")%></font></div>
                </td>
              </tr>
            </table>
            <%
rs.movenext
loop
rs.close
%>
            <p>&nbsp;</p>
            <table width="799" border="1" cellspacing="0" cellpadding="0" height="30">
              <tr> 
                <td width="94"> 
                  <div align="center">班级汇总</div>
                </td>
                <td width="68"> 
                  <div align="center">语文</div>
                </td>
                <td width="68"> 
                  <div align="center">数学</div>
                </td>
                <td width="73"> 
                  <div align="center">英语</div>
                </td>
                <td width="71"> 
                  <div align="center">物理</div>
                </td>
                <td width="72"> 
                  <div align="center">化学</div>
                </td>
                <td width="69"> 
                  <div align="center">生物</div>
                </td>
                <td width="67"> 
                  <div align="center">政治</div>
                </td>
                <td width="68"> 
                  <div align="center">历史</div>
                </td>
                <td width="60"> 
                  <div align="center">地理</div>
                </td>
                <td width="65"> 
                  <div align="center">总分</div>
                </td>
              </tr>
              <tr> 
                <td width="94"> 
                  <div align="center">平均分</div>
                </td>
                <td width="68"> 
                  <div align="center"> 
                    <%
dim rsl 
dim sqll 
set rsl = server.createobject("adodb.recordset") 
sqll = "select avg(language) as av,max(language) as max from scores where grade="&grade&" and class="&banji&""
on error resume next 
rsl.Open sqll,conn,1  
%>
                    <font size="2"><%=round(rsl("av"),2)%> </font></div>
                </td>
                <td width="68"> 
                  <div align="center"> 
                    <%
dim rsm 
dim sqlm 
set rsm = server.createobject("adodb.recordset") 
sqlm = "select avg(mathe) as av,max(mathe) as max from scores where grade="&grade&" and class="&banji&""
on error resume next 
rsm.Open sqlm,conn,1  
%>
                    <font size="2"><%=round(rsm("av"),2)%> </font></div>
                </td>
                <td width="73"> 
                  <div align="center"> 
                    <%
dim rse 
dim sqle 
set rse = server.createobject("adodb.recordset") 
sqle = "select avg(english) as av,max(english) as max from scores where grade="&grade&" and class="&banji&""
on error resume next 
rse.Open sqle,conn,1  
%>
                    <font size="2"><%=round(rse("av"),2)%> </font></div>
                </td>
                <td width="71"> 
                  <div align="center"> 
                    <%
dim rsp 
dim sqlp 
set rsp = server.createobject("adodb.recordset") 
sqlp = "select avg(physics) as av,max(physics) as max from scores where grade="&grade&" and class="&banji&""
on error resume next 
rsp.Open sqlp,conn,1  
%>
                    <font size="2"><%=round(rsp("av"),2)%> </font></div>
                </td>
                <td width="72"> 
                  <div align="center"> 
                    <%
dim rsc 
dim sqlc 
set rsc = server.createobject("adodb.recordset") 
sqlc = "select avg(chemical) as av,max(chemical) as max from scores where grade="&grade&" and class="&banji&""
on error resume next 
rsc.Open sqlc,conn,1  
%>
                    <font size="2"><%=round(rsc("av"),2)%> </font></div>
                </td>
                <td width="69"> 
                  <div align="center"> 
                    <%
dim rsb 
dim sqlb 
set rsb = server.createobject("adodb.recordset") 
sqlb = "select avg(biological) as av,max(biological) as max from scores where grade="&grade&" and class="&banji&""
on error resume next 
rsb.Open sqlb,conn,1  
%>
                    <font size="2"><%=round(rsb("av"),2)%> </font></div>
                </td>
                <td width="67"> 
                  <div align="center"> 
                    <%
dim rsz 
dim sqlz 
set rsz = server.createobject("adodb.recordset") 
sqlz = "select avg(politics) as av,max(politics) as max from scores where grade="&grade&" and class="&banji&""
on error resume next 
rsz.Open sqlz,conn,1  
%>
                    <font size="2"><%=round(rsz("av"),2)%> </font></div>
                </td>
                <td width="68"> 
                  <div align="center"> 
                    <%
dim rsh 
dim sqlh 
set rsh = server.createobject("adodb.recordset") 
sqlh = "select avg(history) as av,max(history) as max from scores where grade="&grade&" and class="&banji&""
on error resume next 
rsh.Open sqlh,conn,1  
%>
                    <font size="2"><%=round(rsh("av"),2)%> </font></div>
                </td>
                <td width="60"> 
                  <div align="center"> 
                    <%
dim rsg 
dim sqlg 
set rsg = server.createobject("adodb.recordset") 
sqlg = "select avg(geography) as av,max(geography) as max from scores where grade="&grade&" and class="&banji&""
on error resume next 
rsg.Open sqlg,conn,1  
%>
                    <font size="2"><%=round(rsg("av"),2)%> </font></div>
                </td>
                <td width="65"> 
                  <div align="center"> 
                    <%
dim rsa 
dim sqla 
set rsa = server.createobject("adodb.recordset") 
sqla = "select avg(language+mathe+english+physics+chemical+biological+politics+history+geography) as av,max(language+mathe+english+physics+chemical+biological+politics+history+geography) as max from scores where grade="&grade&" and class="&banji&""
on error resume next 
rsa.Open sqla,conn,1  
%>
                    <font size="2"><%=round(rsa("av"),2)%> </font></div>
                </td>
              </tr>
              <tr> 
                <td width="94"> 
                  <div align="center">最高分</div>
                </td>
                <td width="68"> 
                  <div align="center"><font size="2"><%=rsl("max")%> 
                    <% rsl.close %>
                    </font></div>
                </td>
                <td width="68"> 
                  <div align="center"><font size="2"><%=rsm("max")%> 
                    <% rsm.close %>
                    </font></div>
                </td>
                <td width="73"> 
                  <div align="center"><font size="2"><%=rse("max")%> 
                    <% rse.close %>
                    </font></div>
                </td>
                <td width="71"> 
                  <div align="center"><font size="2"><%=rsp("max")%> 
                    <% rsp.close %>
                    </font></div>
                </td>
                <td width="72"> 
                  <div align="center"><font size="2"><%=rsc("max")%> 
                    <% rsc.close %>
                    </font></div>
                </td>
                <td width="69"> 
                  <div align="center"><font size="2"><%=rsb("max")%> 
                    <% rsb.close %>
                    </font></div>
                </td>
                <td width="67"> 
                  <div align="center"><font size="2"><%=rsz("max")%> 
                    <% rsz.close %>
                    </font></div>
                </td>
                <td width="68"> 
                  <div align="center"><font size="2"><%=rsh("max")%> 
                    <% rsh.close %>
                    </font></div>
                </td>
                <td width="60"> 
                  <div align="center"><font size="2"><%=rsg("max")%> 
                    <% rsg.close %>
                    </font></div>
                </td>
                <td width="65"> 
                  <div align="center"><font size="2"><%=round(rsa("max"),2)%> 
                    <% rsa.close %>
                    </font></div>
                </td>
              </tr>
            </table>
            <p>&nbsp;</p>
          </td>
        </tr>
        <tr> 
          <td height="18"> 
            <div align="center"><font size="2" color="#000000" face="Arial, Helvetica, sans-serif">Copyright&copy; 
              问剑网ASP小组 All right Reserved QQ:349643649</font><font size="2" color="#000000"> 
              </font></div>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
</body>
</html>