📄 booksearch.asp
字号:
<!--#include file="../conndb.asp"-->
<!--#include file="isAdmin.asp"-->
<html>
<head>
<title>旅游在线报名查询</title>
<link href="../style.css" rel="stylesheet">
</head>
<body>
<form method="POST" action="BookSearchRlt.asp">
<table border="0" cellspacing="1" width="100%">
<tr>
<td><img src="../pic/search2.jpg" border=0></td>
<td width="82%"><b><font color="#000080" size=3>旅游在线报名查询</font></b></td>
</tr>
</table>
<br><br>
<table border="0" cellspacing="1" width="100%">
<tr>
<td width="100%">线路名称
<%
Dim rs
Set rs = Server.CreateObject("ADODB.RecordSet")
sql = "SELECT * FROM Line ORDER BY AreaId"
Set rs = Conn.Execute(sql)
%>
<select name="slt">
<option value="0" selected>-选择旅游线路-</option>
<% Do While NOT rs.EOF%>
<option value="<%=rs("LineId")%>"><%=rs("LineName")%></option>
<% rs.MoveNext
Loop
%>
</select>
</td>
</tr>
<tr>
<td width="100%">报名时间
从<input type="text" name="sdate" size="20">
到<input type="text" name="edate" size="20">
(日期格式：2004-01-05)</td>
</tr>
<tr>
<td width="100%">报 名 人
<input type="text" name="person" size="20"></td>
</tr>
<tr>
<td width="100%"><font color=red>* 如果日期格式错误，则按照没有日期范围查询。</font></td>
</tr>
</table>
<p><input type="submit" value=" 查 询 " name="B1">
<input type="reset" value=" 重 写 " name="B2"></p>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -