⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 stu_pmc.asp

📁 C# SQL 齐齐哈尔职业学院学生成绩管理系统
💻 ASP
字号:
🔍 
<!--#include file="chkadmin.asp"-->
<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css.css" rel="stylesheet" type="text/css">
<title>学生成绩管理系统</title>
</head>

<body>
<%
Dim classid,classname
classid=Request("classid")
set fs=server.createobject("adodb.recordset")
fs.open "select * from [class] where id="&classid,conn,1,1
  set rs=server.createobject("adodb.recordset")
  rs.open "select * from [pro] where id="&fs("proid"),conn,1,1
  classname=rs("xi")&rs("pro")&fs("num")&"班"
  rs.Close
  Set rs=nothing
fs.Close
Set fs=nothing
%>
<div align="center">
  <center>
  <table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#ffffff" width="100%">
    
    <tr>
      <td width="105%" background="../Images/admin_table_bg.gif" height="25" colspan="5">
      <p align="center"><font color="#FFFFFF"><b><%=classname%>学生名单</b></font></td>
    </tr>
    <tr>
      <td width="20%" height="15" bgcolor="#D9E6FF" align="center">姓 名</td>
      <td width="20%" height="15" bgcolor="#D9E6FF" align="center">学 号</td>
      <td width="20%" height="15" bgcolor="#D9E6FF" align="center">系统编号</td>
      <td width="20%" height="15" bgcolor="#D9E6FF" align="center">性 别</td>
      <td width="20%" height="15" bgcolor="#D9E6FF" align="center">操 作</td>
    </tr>    
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from [stu]",conn,1,1
If rs.RecordCount=0 Then

Else
  Do while not rs.eof
    If rs("classid")=Cint(classid) Then
%>

    <tr>
      <td width="20%" height="15" bgcolor="#D9E6FF" align="center">　<%=rs("name")%></td>
      <td width="20%" height="15" bgcolor="#D9E6FF" align="center">　<%=rs("xid")%></td>
      <td width="20%" height="15" bgcolor="#D9E6FF" align="center">　<%=rs("id")%></td>
      <td width="20%" height="15" bgcolor="#D9E6FF" align="center">　<%=rs("sex")%></td>
      <td width="20%" height="15" bgcolor="#D9E6FF" align="center">
      <a href="stu_name.asp?xid=<%=rs("xid")%>">[修改]</a> | 
      <a href="stu_del.asp?id=<%=rs("xid")%>">[删除]</a></td>
    </tr>
<%
End If
rs.MoveNext
Loop
End If

%>
    <tr>
      <td width="105%" bgcolor="#D9E6FF" height="15" colspan="5">
      <p align="center"><a href="stu_add.asp">[添 加]</a></td>
    </tr>
  </table>
  </center>
</div>

</body>

</html>

⌨️ 快捷键说明

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