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

📄 unpass.asp

📁 在线考试系统
💻 ASP
字号:
<!--#include file="conn.inc"-->
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>未经审批的考试计划</title>
<link rel="stylesheet" type="text/css" href="css.css">
</head>

<body style="text-align: center">

<table border="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber2" height="25">
  <tr>
    <td width="100%">当前位置:<a href="news.asp">系统管理</a> &gt;
    <a href="searchscore.asp">查询成绩</a> &gt; 未审批考试计划查询</td>
  </tr>
</table>
<table border="1" cellpadding="0" cellspacing="1" style="border-collapse: collapse" bordercolor="#C0C0C0" width="100%" id="AutoNumber1">
  <tr>
    <td bgcolor="#E1E1E1" height="30" colspan="7">
    <p align="center"><b><font color="#FF0000" size="3" face="黑体">未通过审批的考试计划</font></b></td>
  </tr>
  <tr>
    <td width="30" align="center" bgcolor="#E1E1E1" height="20"><b>序号</b></td>
    <td align="center" bgcolor="#E1E1E1" width="100">
    <p align="center"><b>考试编号</b></td>
    <td align="center" bgcolor="#E1E1E1"><b>科目</b></td>
    <td align="center" bgcolor="#E1E1E1">
    <p align="center"><b>有效期</b></td>
    <td align="center" bgcolor="#E1E1E1" width="100"><b>设定人</b></td>
    <td align="center" bgcolor="#E1E1E1" width="100"><b>设定批准人</b></td>
    <td align="center" bgcolor="#E1E1E1" width="100"><b>设定时间</b></td>
  </tr>
  <%
sql="select * from exam_test where passuserid is null"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
on error resume next
rs.PageSize = 10
Page = CLng(Request("Page"))
If Page < 1 Then Page = 1
If Page > rs.PageCount Then Page = rs.PageCount
i=page+(page-1)*9
rs.AbsolutePage = Page
For iPage = 1 To rs.PageSize
%>
  <tr>
    <td align="center" bgcolor="#E1E1E1" height="20"><%=i%> </td>
    <td align="center"><%=rs("testid")%> </td>
    <td align="center"><%=rs("subject")%> </td>
    <td align="center"><%=formatdatetime(rs("starttime"),1)%>—<%=formatdatetime(rs("endtime"),1)%></td>
    <td align="center"><%=rs("setuserid")%> </td>
    <td align="center"><%=rs("passuserid")%> </td>
    <td align="center"><%=rs("settime")%> </td>
  </tr>
  <% 
rs.MoveNext
If rs.EOF Then Exit For
i=i+1
Next
%>
  <caption></caption>
</table>
<div ALIGN="right">
  <form ACTION="<%=Myself%>" METHOD="GET">
    <table>
      <tr>
        <td>
        <p ALIGN="right"><%If Page <> 1 Then ' 如果不是位于第一页%>
        <a href="<%=Myself%>?Page=1">第一页</a>
        <a HREF="<%=Myself%>?Page=<%=(Page-1)%>">上一页</a>
        <%                                      
End If                                         
If Page <> rs.PageCount Then ' 如果不是位于最后一页                                         
%> <a HREF="<%=Myself%>?Page=<%=(Page+1)%>">下一页</a>
        <a HREF="<%=Myself%>?Page=<%=rs.PageCount%>">最后一页</a> <% End If %>
        <font SIZE="2">输入页次:</font><input NAME="Page" SIZE="3" CLASS="s01">
        <font SIZE="2">页次:</font><font COLOR="Red" SIZE="2"><%=Page%>/<%=rs.PageCount%></font></p>
        <p> </td>
      </tr>
    </table>
  </form>
</div>

</body>

</html>

⌨️ 快捷键说明

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