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

📄 searchexam.asp

📁 一套在线考试系统
💻 ASP
字号:
<!--#include file="conn.asp"-->
<%
Dim examid
Dim examname
Dim subject
Dim starttime
Dim endtime
Dim setusername
Dim i
examname="%"&request("examname")&"%"
examid="%"&request("examid")&"%"
subject="%"&request("subject")&"%"
if request("starttime")="" then
  starttime="1970-1-1"
else
  starttime=request("starttime")
end if
if request("endtime")="" then
  endtime="2050-1-1"
else
  endtime=request("endtime")
end if
setusername="%"&request("setusername")&"%"
%>
<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="../DEFAULT.CSS">
<script language="JavaScript1.2" src="../js/lock.js"></script>
</head>

<body oncontextmenu="self.event.returnValue=false" onselectstart="selectstart();" bgcolor="#FFFFFF">

<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#007CD0" width="100%" id="AutoNumber1" height="25">
  <tr>
    <td width="100%">当前位置:考试管理 &gt; <font color="#FF0000">查询考试计划</font></td>
  </tr>
</table>
<hr noshade color="#FFFFFF" size="1"><% if request("btnSearch")<>"" then %>
<% sql="select * from view_exam where examid like '"&examid&"' and examname like '"&examname&"' and subject like '"&subject&"' and setusername like '"&setusername&"' and settime between '"&starttime&"' and '"&endtime&"'"
      rs.open sql,conn,3,2
      if rs.eof then %>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" height="20" class="noborder" bgcolor="#F1F1F1">
  <tr>
    <td width="100%" class="border">
    <p align="center">没有符合条件的考试计划!</td>
  </tr>
</table>
<% else %>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#007CD0" width="100%" id="AutoNumber4" bgcolor="#F1F1F1">
  <tr>
    <td height="20" class="border_blue" colspan="6">&nbsp;考试计划搜索结果</td>
  </tr>
  <tr>
    <td height="20" colspan="6">&nbsp;共搜索到 <%=rs.recordcount%> 条记录</td>
  </tr>
  <tr>
    <td height="20" class="border" align="center" width="40">序号</td>
    <td class="border" align="center">考试名称</td>
    <td class="border" align="center">科目类别</td>
    <td class="border" align="center">制定人</td>
    <td class="border" align="center">制定时间</td>
    <td class="border" align="center">是否有效</td>
  </tr>
  <% i=1
      do while not rs.eof %>
  <tr>
    <td height="20" align="center" width="40"><%=i%> </td>
    <td>&nbsp;<a href="examinfo.asp?examid=<%=rs("examid")%>"><%=rs("examname")%></a></td>
    <td align="center"><%=rs("subject")%> </td>
    <td align="center"><%=rs("setusername")%> </td>
    <td align="center"><%=rs("settime")%> </td>
    <td align="center">
    <% if (rs("endtime")<date() or rs("passuserid")=null) then response.write "已失效" else response.write "有效" %>  </td>
  </tr>
  <% rs.movenext
      i=i+1
      loop
      end if %>
</table>
<% end if %>
<form method="POST" action="searchexam.asp">
  <div align="center">
    <center>
    <table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#000000" width="480" id="AutoNumber3" bgcolor="#F1F1F1">
      <tr>
        <td height="25" class="border" colspan="2">&nbsp;查询新闻</td>
      </tr>
      <tr>
        <td height="20" colspan="2">&nbsp;请输入关键字,可以用%代表任意字符</td>
      </tr>
      <tr>
        <td width="120" height="20" align="right">考试计划编号:</td>
        <td>&nbsp;<input type="text" name="examid" size="20" class="s01"></td>
      </tr>
      <tr>
        <td height="20" align="right">考试名称:</td>
        <td>&nbsp;<input type="text" name="examname" size="20" class="s01"></td>
      </tr>
      <tr>
        <td height="20" align="right">考试科目类别:</td>
        <td>&nbsp;<input type="text" name="subject" size="20" class="s01"></td>
      </tr>
      <tr>
        <td height="20" align="right">制定时间:</td>
        <td>&nbsp;<input name="starttime" readOnly class="s01" style="TEXT-ALIGN: center" size="16"><input onclick="popFrame.fPopCalendar(starttime,starttime,popCal);return false" class="c02" value="▼" size="2" name="1" readonly> 
        <input name="endtime" readOnly class="s01" style="TEXT-ALIGN: center" size="16"><input onclick="popFrame.fPopCalendar(endtime,endtime,popCal);return false" class="c02" value="▼" size="2" name="1" readonly></td>
      </tr>
      <tr>
        <td height="20" align="right">制定人:</td>
        <td>&nbsp;<input type="text" name="setusername" size="20" class="s01"> (注:姓名)</td>
      </tr>
      <tr>
        <td colspan="2" height="30" class="border" style="height: 30">
        <p align="center">
        <input type="submit" value="搜 索" name="btnSearch" class="s02">&nbsp;
        <input type="reset" value="重 置" name="B2" class="s02"></td>
      </tr>
    </table>
    </center>
  </div>
</form>
<!--  put these lines below ahead of you page --->
<div id="popCal" style="POSITION: absolute; VISIBILITY: hidden; WIDTH: 10px">
  <iframe frameBorder="0" height="160" name="popFrame" scrolling="no" width="282" src="popcjs.asp">
  </iframe>
</div>
<script event="onclick()" for="document">popCal.style.visibility = "hidden";
</script>
<!--  put these lines above ahead of you page --->

</body>

</html>

⌨️ 快捷键说明

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