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

📄 cj.asp

📁 学生成长管理系统V2008
💻 ASP
字号:
<!-- #include file="Include/Chk.asp" -->
<!-- #include file="Include/Conn.asp" -->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title></title>
<link href="Images/main.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="100%" border="0" cellpadding="5" cellspacing="1">
  <tr>
    <td height="25" colspan="4" bgcolor="#3385D1" class="window-0"><table width="100%" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td width="19%">成绩单(按成绩排序)</td>
        <td width="81%" align="center">&nbsp;</td>
      </tr>
    </table></td>
  </tr>
  <tr>
    <td width="20%" height="25" align="center" valign="middle" bgcolor="#efefef" class="font1">姓名</td>
    <td width="20%" align="center" valign="middle" bgcolor="#efefef" class="font1">单位</td>
    <td width="20%" align="center" valign="middle" bgcolor="#efefef" class="font1">用户名</td>
    <td width="20%" align="center" valign="middle" bgcolor="#efefef" class="font1">成绩</td>
  </tr>
<%
sql = "select * from Stu order by cj desc"
Set rs=Server.Createobject("ADODB.RECORDSET")
rs.Open sql, conn, 1, 1

Do while not rs.eof %> 
 <tr>
   <td width="20%" height="25" align="left" valign="middle" bgcolor="#efefef" class="link2"><%=rs("name")%></td>
    <td width="20%" align="center" valign="middle" bgcolor="#efefef" class="link2"><%=rs("dw")%></td>
    <td width="20%" align="center" valign="middle" bgcolor="#efefef" class="link2"><%=rs("username")%></td>
    <td width="20%" align="center" valign="middle" bgcolor="#efefef" class="link2"><%=rs("cj")%></td>
  </tr>
<% 
rs.MoveNext
Loop
rs.Close
Set rs = Nothing 
%>
</table>
</body>
</html>

⌨️ 快捷键说明

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