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

📄 query.asp

📁 学生评教系统,可以实现学生评教,教师查分功能.
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="inc/const.asp"-->
<!--#include file="inc/char.asp"-->
<!--#include file="inc/stats.asp"-->
<html>

<head>
<meta NAME="GENERATOR" Content="Microsoft FrontPage 4.0">
<meta HTTP-EQUIV="Content-Type" content="text/html; charset=gb_2312">
<link rel="stylesheet" type="text/css" href="forum.css">
<title>搜索</title>
</head>
<body bgcolor="#006699" alink="#333333" vlink="#333333" link="#333333" topmargin="0" leftmargin="0" background="../IMAGE/BCG_127.gif">

<br>
<%
   dim sql,rs
   dim sel
   dim boardid
   dim username
username=Session.Contents("UserName")

   boardid=1
   if not (isNUll(request("boardid")) or isEmpty(request("boardid")) or (request("BoardID")="") ) then
      boardid=request("boardid")
   end if

   set rs=server.createobject("adodb.recordset")
   sql="select * from board"
   rs.open sql,conn,1,1
%>
<table cellpadding=0 cellspacing=0 border=0 width=379 bgcolor=<%=aTablebackcolor%> align=center>
    <tr>    
        <td width="385">
<table cellpadding=6 cellspacing=1 border=0 width=411 height="272" bgcolor="#EFEFEF">
  <TBODY>
  <TR align=middle >
    <TD colSpan=3 height=14 bgcolor="#800000" width="367"><b><font color="#FFFFFF">论坛帖子搜索</font></b></TD></TR>
<form name="queryTopic" method="POST" action="queryResult.asp?type=1">
  <TR >
    <TD width=91 height=25 align="right" bgcolor="#C0C0C0">主题:</TD>
    <TD height=25 width="144">
<input type="text" name="txtTopic" size="26" style="font-size: 12px">&nbsp;  
    </TD>
    <TD height=25 width="142" bgcolor="#C0C0C0" align="center">
<input type="submit" value="查 询" name="cmdTopic"  style="font-size: 12px">  
    </TD></TR>
</form>
<form name="queryUser" method="POST" action="queryResult.asp?type=2">
  <TR >
    <TD width=91 height=27 align="right" bgcolor="#C0C0C0">发言人:</TD>
    <TD height=27 width="144">
<input type="text" name="txtUser" size="26" style="font-size: 12px"><input type="hidden" name="selBoard" value="1">  
    </TD>
    <TD height=27 width="142" bgcolor="#C0C0C0" align="center">
<input type="submit" value="查 询" name="cmdTopic" style="font-size: 12px">  
    </TD></TR>
</form>
<form name="queryUser" method="POST" action="queryResult.asp?type=3">
  <TR >
    <TD width=91 height=27 align="right" bgcolor="#C0C0C0">内容:</TD>
    <TD height=27 width="144">
<input type="text" name="txtCon" size="26" style="font-size: 12px"><input type="hidden" name="selBoard" value="1">  
    </TD>
    <TD height=27 width="142" bgcolor="#C0C0C0" align="center">
<input type="submit" value="查 询" style="font-size: 12px">  
    </TD></TR>
</form>
<form name="queryUser" method="POST" action="queryResult.asp?type=4">
  <TR >
    <TD width=91 height=27 align="right" bgcolor="#C0C0C0"><b> I&nbsp;D:</b></TD>
    <TD height=27 width="144">
<select name="selCompare" size="1">
 <option selected value="=">=</option>
 <option value=">">&gt;</option>
 <option value=">=">&gt;=</option>
 <option value="<">&lt;</option>
 <option value="<=">&lt;=</option>
 </select>
<input type="text" name="aid" size="6" style="font-size: 12px"><input type="hidden" name="selBoard" value="1">       
    </TD>
    <TD height=27 width="142" bgcolor="#C0C0C0" align="center">
<input type="submit" value="查 询" style="font-size: 12px">    
    </TD></TR>
</form>
<form name="queryUser" method="POST" action="queryResult.asp?type=5">
  <TR >
    <TD width=91 height=27 align="right" bgcolor="#C0C0C0">新贴:</TD>
    <TD height=27 width="144">
<select  name="selTimeLimit" size="1"  style="font-size: 12px">    <option value="一天">一天内&nbsp;</option>    <option value="一周">一周内</option>    <option value="一月">一月内</option>    <option value="一年">一年内</option>  </select><input type="hidden" name="selBoard" value="1">&nbsp;   
    </TD>
    <TD height=27 width="142" bgcolor="#C0C0C0" align="center">
<input type="submit" value="查 询" style="font-size: 12px">   
    </TD></TR>
</form>
<form name="queryUser" method="POST" action="queryResult.asp?type=6">
  <TR >
    <TD width=91 height=27 align="right" bgcolor="#C0C0C0">其他查询:</TD>
    <TD height=27 width="144">
<select name="selCompare" size="1" style="font-size: 12px">
          <option value="2">查询最新的50个帖子</option><option value="1">查询点击数为前10位的帖子</option></select>&nbsp;&nbsp;&nbsp;&nbsp;
    </td>
    <TD height=27 width="142" bgcolor="#C0C0C0" align="center">
<input type="submit" value="查 询" name="cmdTopic" style="font-size: 12px">
    </td>
  </TR>
</TBODY></TABLE>
    </td>
  </TR>
</TABLE>
</body>
</html>

⌨️ 快捷键说明

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