manager.asp

来自「managerc.zip」· ASP 代码 · 共 164 行

ASP
164
字号
<!--#include file="conn.asp"-->
<%
if session("user")="" then
	response.write "您无此权限"
	response.end
end if

'------------------------------------------------------------------------------------

'------------------------------------------------------------------------------------
%>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>计算机学生管理中心</title>
<link rel="stylesheet" href="style.css">
</head>

<body topmargin="0">
<!--#include file="top.asp"-->
<div align="center">
  <center>
<table width="738"><img border="0" src="images/top_1.jpg">
  <td><img border="0" src="images/girl.jpg"></table>
  </center>
  </div>
<div align="center">
  <center>
  <table border="0" width="500" cellspacing="0" cellpadding="0">
    <tr>
      <td width="100%">
      </td>
    </tr>
  </table>
  </center>
</div>
<div align="center">
  <center>
  <table border="0" width="700">
    <tr>
      <td width="187" valign="top">
        <table border="1" width="100%" bordercolorlight="#000000" cellspacing="0" cellpadding="5" bordercolordark="#FFFFFF">
          <tr>
            <td width="100%" bgcolor="#F8F0FF">学生信息管理</td>
          </tr>
          <tr>
            <td width="100%">该项目包括学生所有信息输入,管理,修改,删除等。</td>
          </tr>
          <tr>
            <td width="100%" bgcolor="#F8F0FF">学生成绩管理</td>
          </tr>
          <tr>
            <td width="100%">该项目包括各学期学生考试情况以及总分排行榜</td>
          </tr>
          <tr>
            <td width="100%" bgcolor="#F8F0FF">考试管理</td>
          </tr>
          <tr>
            <td width="100%">该栏目用于添加各次考试</td>
          </tr>
          <tr>
            <td width="100%" bgcolor="#F8F0FF">班级管理</td>
          </tr>
          <tr>
            <td width="100%">该栏目用于添加各班级</td>
          </tr>
        </table>
      </td>
      <td width="503" valign="top">
        <table border="1" width="100%" bordercolorlight="#000000" cellspacing="0" cellpadding="5" bordercolordark="#FFFFFF">
          <tr>
            <td width="50%" valign="top">最近登录学生</td>
            <td width="50%" valign="top">最近十项考试科目</td>
          </tr>
          <%set rs=server.createobject("adodb.recordset")%>
          <%sql="select top 10 * from st_info order by id desc"%>
          <%rs.open sql,conn,1,1%>
          <tr>
            <td width="50%" valign="top">
              <table border="0" width="100%" cellspacing="0" cellpadding="4">
                <tr>
                  <td width="19%">ID号</td>
                  <td width="23%">学号</td>
                  <td width="25%">姓名</td>
                  <td width="33%">班级</td>
                                  </tr>
                <tr>
                <%do while not rs.eof%>
                  <td width="19%"><%=rs("id")%></td>
                  <td width="23%"><%=rs("user_number")%></td>
                  <td width="25%"><a href=viewuser.asp?id=<%=rs("id")%>><%=rs("user_name")%></a></td>
                  <td width="33%"><%=rs("user_class")%></td>
                                  </tr>
                                  <%rs.movenext%>
                                  <%loop%>
                                  <%rs.close%>
              </table>
            </td>
            <td width="50%" valign="top">
              <table border="0" width="100%">
              <%set rs2=server.createobject("adodb.recordset")
              sql2="select top 8 * from subject order by id desc"
              rs2.open sql2,conn,1,1
              %>
              <%do while not rs2.eof%>
                <tr>
                  <td width="100%"><%=rs2("subject")%></td>
                </tr>
                <%rs2.movenext%>
                <%loop%>
                <%rs2.close%>
              </table>
            </td>
          </tr>
          <tr>
            <td width="50%" valign="top">最近加入班级</td>
            <td width="50%" valign="top">最近十场考试</td>
          </tr>
          <%set rs1=server.createobject("adodb.recordset")%>
          <%sql1="select top 10 * from class"%>
          <%rs1.open sql1,conn,1,1%>
          <tr>
            <td width="50%" valign="top">
              <table border="0" width="100%" cellspacing="0" cellpadding="4">
              <%do while not rs1.eof%>
                <tr>
                  <td width="100%"><%=rs1("stclass")%></td>
                </tr>
                <%rs1.movenext%>
                <%loop%>
                <%rs1.close%>
              </table>
            </td>
            <%
            set rs3=server.createobject("adodb.recordset")
            sql3="select top 10 * from testno order by id desc"
            rs3.open sql3,conn,1,1
            %>
            <%do while not rs3.eof%>
            <td width="50%" valign="top">
              <table border="0" width="100%">
                <tr>
                  <td width="100%"><%=rs3("testno")%></td>
                </tr>
                <%rs3.movenext%>
                <%loop%>
                <%rs3.close%>
              </table>
            </td>
          </tr>
        </table>
      </td>
    </tr>
  </table>
  </center>
</div>
<!--#include file="down.asp"-->
</body>

</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?