📄 search_answer.asp
字号:
<%if session("password")<>"" then%>
<HTML>
<HEAD>
<title>www.25175.com 在线考试系统v1.61</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="25175_1.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body {
margin-top: 0px;
}
-->
</style></HEAD>
<BODY>
<div align="center">
</div>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="754" valign="top" bgcolor="#A0A4AC" style="line-height:140%;"> 网站名称：<font color="#0000FF"><a href="http://www.25175.com">SP.25175</a></font><br>
网站LOGO：<a href="http://www.25175.com/logo1.GIF">http://www.25175.com/logo1.GIF</a><br>
演示地址：<font color="#0000FF"><a href="http://www.25175.com/asp/test_20050825_v161/">http://www.25175.com/asp/test_20050825_v161/</a><br>
</font>下载地址：<font color="#0000FF"><a href="http://www.25175.com/asp/test_20050825_v161/test_20050825_v161.rar">http://www.25175.com/asp/test_20050825_v161/test_20050825_v161.rar</a><br>
</font> 在线聊天：<a href="http://wpa.qq.com/msgrd?V=1&Uin=29752345&Site=www.25175.com&Menu=yes">29752345</a></td>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="1"><div align="center"></div></td>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="25" bgcolor="#A0A4AC"><a href="index.asp">首页</a> <a href="add.asp">添加试题</a> <a href="delete_all.asp">删除试题</a> <a href="SEARCH.ASP">列出试题答案</a> <a href="change_password.asp">修改密码</a> <a href="login.asp">登入</a> <a href="20050130_logout.asp">退出</a></td>
</tr>
</table>
<!--#include file="conn.asp" -->
<% id=request("id") %>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="1"><div align="center"></div></td>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="25" bgcolor="#A0A4AC">
<%if request("id")<>"" then
sql="select 1 *from test where id like'" &id& "'"
else
sql="select top 1 *from test"
end if
sql="select *from test where id like'"&id&"' "
rs.Open sql,conn,1,1
'RS参数设定为执行SQL的查询语法，数据库文件里的test表中的数据，无论任何条件，全部设计为查询的对象，并由RS作为管理的参数。
if rs.EOF and rs.BOF then
Response.Write "没有这个信息..."
else
%></td>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="1"><div align="center"></div></td>
</tr>
</table>
<%
do while not rs.EOF or rs.BOF
%>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="1"><div align="center"></div></td>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="1">
<tr>
<td height="25" bgcolor="#A0A4AC"> 题目:
<% = rs("question") %></td>
<!-- 用户名 -->
<!--备份 -->
</tr>
<tr>
<td height="25" bgcolor="#A0A4AC">选择A：<%=rs("A")%></td>
</tr>
<tr>
<td height="25" bgcolor="#A0A4AC">选择B：<%=rs("b")%></td>
</tr>
<tr>
<td height="25" bgcolor="#A0A4AC">选择C：<%=rs("c")%></td>
</tr>
<tr>
<td height="25" bgcolor="#A0A4AC">选择D：<%=rs("d")%></td>
</tr>
<tr>
<td height="25" bgcolor="#A0A4AC">正确答案：<%=rs("ans")%></td>
</tr>
</table>
<%
rs.movenext
loop
end if
%>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="25" bgcolor="#A0A4AC">共
<%=rs.RecordCount %>条记录
<%=rs.source%> </td>
</tr>
</table>
<%
set rs=nothing
set conn=nothing
%>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="1"><div align="center"></div></td>
</tr>
</table>
<table width="768" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="20" bgcolor="#A0A4AC"><div align="center" class="style1">
<div align="center"><a href="http://www.25175.com">powered by 25175</a></div>
</div></td>
</tr>
</table>
</BODY>
</HTML>
<%else
Response.Redirect "20050130_loginagine.asp"
end if%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -