📄 select.asp
字号:
<!--#include file="conn.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>网上图书馆</title>
</head>
<body style="text-align: center">
<form method="POST" action=show.asp>
<table border="0" width="100%" height="25" bgcolor="#2487E1" id="table1" >
<tr><td> <p align="center">
<img border="0" src="image/top.jpg" width="725" height="59"></td>
</tr></table>
<table border="1" width="100%" height="25" bgcolor="#2487E1"
bordercolor="#C0C0C0"> <tr>
<td align="center" bgcolor="#2487E1"><b><font color="#FFFFFF" size="2">
<a href="Select.asp"><font color="#FFFFFF">图书检索</font></a></font></b></td>
<td align="center" bgcolor="#2487E1"><b><font color="#FFFFFF" size="2">
<a href="BorrowCase.asp"><font color="#FFFFFF">状态查询</font></a></font></b></td>
<td align="center" bgcolor="#2487E1"><b><font color="#FFFFFF" size="2">
<a href="PWDModify.asp"><font color="#FFFFFF">修改密码</font></a></font></b></td>
<td align="center" bgcolor="#2487E1"><b><font color="#FFFFFF" size="2">
<a href=index.asp><font color="#FFFFFF">退出登录</font></a></font></b></td></tr></table>
<table border="1" width="45%" id="table1" cellspacing="0"
bordercolor="#C0C0C0" height="258">
<tr align =center><td colspan="2" height="87" align="center" bgcolor="#006699"><b>
<font color="#FFFFFF">请选择图书检索条件</font></b></td></tr>
<tr><td width="28%" align="left"><font size="2">图书名称</font> </td>
<td width="60%" align="center">
<input type="text" name="Title" size="36"></td></tr>
<tr><td width="28%" align="left"><font size="2">图书作者</font></td>
<td width="60%" align="center">
<input type="text" name="Author" size="36"></td> </tr>
<tr><td width="28%" align="left"><font size="2">出版社</font></td>
<td width="60%" align="center"><select size="1" name ="Publisher">
<option value="">----------------------------------</option>
<%
Sql="select distinct(Publisher) from bookproperties"
Set rs=conn.Execute(sql)
Do while not rs.eof
Response.write("<option value='" & trim(rs("Publisher")) & "'" )
If rs("Publisher")=Request("Publisher") then
Response.write "selected"
End if
Response.write (">" & trim(rs("Publisher")) & "</option>")
rs.movenext
Loop
%>
</select></td> </tr>
<tr><td width="28%" align="left"><font size="2">图书类别</font></td>
<td width="60%" align="center"><select size="1" name ="SortName ">
<option value="">----------------------------------</option>
<%
Sql="select distinct sort,SortName from bookproperties a inner join booksort b on a.sort=b.sortcode"
Set rs=conn.Execute(sql)
Do while not rs.eof
Response.write("<option value='" & trim(rs("Sort")) & "'" )
If rs("Sort")=Request("Sort") then
Response.write "selected"
End if
Response.write (">" & trim(rs("SortName")) & "</option>")
rs.movenext
Loop
%>
</select></td> </tr>
<tr><td width="28%" align="left"><font size="2">出版日期</font></td>
<td width="60%" align="center"><select name="date1" id="date1">
<% dim i,y
y=year(now)
for i= y-20 to y-20
Response.write("<option value='" & cstr(i) & "'>" & cstr(i) & "</option>")
next
%>
</select><font size="2"> 年 </font>
<select name="date2" id="date2">
<option value="1" selected>1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
</select><font size="2">
月
</font>
<select name="date3" id="date3">
<option value="1" selected>1</option>
<%
for i= 2 to 31
Response.write("<option value='" & cstr(i) & "'>" & cstr(i) & "</option>")
next
%>
</select><font color="#FF0000" size="2">日 </font><br>
<font color="#000000 size="1">到</font>
<select name="date11" id="date11">
<%
y=year(now)
for i= y to y-20 step -1
Response.write("<option value='" & cstr(i) & "'>" & cstr(i) & "</option>")
next
%>
</select><font size="2"> 年 </font>
<select name="date22" id="select2">
<option value="1" selected>1</option>
<option value="2">2</option>
<option value="3">3</option>
<option value="4">4</option>
<option value="5">5</option>
<option value="6">6</option>
<option value="7">7</option>
<option value="8">8</option>
<option value="9">9</option>
<option value="10">10</option>
<option value="11">11</option>
<option value="12">12</option>
</select><font size="2"> 月 </font>
<select name="date33" id="select3">
<option value="1" selected>1</option>
<%
for i= 2 to 31
Response.write("<option value='" & cstr(i) & "'>" & cstr(i) & "</option>")
next
%>
</select><font size="2">日 </font> </td> </tr>
<tr>
<td width="88%" align="center" colspan="2" height="33">
<input name="active" type="hidden" id="active" value="yes">
<input type="submit" name="Submit" value="确定查询" >
<input type="reset" name="Submit2" value="重新输入"></td>
</tr>
</table>
</form>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -