search.asp

一个简单的图书管理系统！毕业论文

<link href="style.css" type="text/css" rel="stylesheet">
<!--#include file="conn.asp"-->
<%'定义记录集和变量
set rs=server.createobject("adodb.recordset")
bookname=trim(request("bookname"))
booktype=request("booktype")
publishing=trim(request("publishing"))
money1=trim(request("money1"))
money2=trim(request("money2"))
date1=trim(request("date1"))
date11=trim(request("date11"))
date2=trim(request("date2"))
date22=trim(request("date22"))
date3=trim(request("date3"))
date33=trim(request("date33"))
date111=date1&"-"&date2&"-"&date3
date222=date11&"-"&date22&"-"&date33
'查询判断 一直出错误 改了N次
sql="select * from book where 1=1 "
if booktype<>"" then
sql=sql+"and booktype like '%"&booktype&"%'"
else if bookname<>"" then
sql=sql+"and bookname like  '%"&bookname&"%'"
else if publishing<>"" then
sql=sql+"and publishing like '%"&publishing&"%' "
end if
end if
end if
sql=sql+"and bookmoney>='"&money1&"' and bookmoney<='"&money2&"' and pdate between '"&date111&"' and '"&date222&"' order by id desc"
rs.open sql,db,1,3
if rs.eof or rs.bof then
response.write "<br><br><div>对不起没有搜索到记录 <a href='javascript:history.go(-1)' target='right'>返回</a></div>"
response.end
else
'页面显示
dim pagenum,i
rs.pagesize=10
pagecount1=rs.pagecount
if request.querystring("pagenum")=0 or request.querystring("pagenum")="" then
pagenum=1
else
pagenum=trim(request("pagenum"))
rs.absolutepage=trim(request("pagenum"))
end if
%>
<table width="666" border="0" align="center" cellpadding="5" cellspacing="0">
  <tr align="center" > 
    <td>ID</td>
	<td>书名</td>
    <td>出版社</td>
    <td >类型</td>
    <td>出版日期</td>
    <td>价格</td>
	 <td >数量</td>
	<td>操作</td>
  </tr>
  <%
  do while not rs.eof and i<rs.PageSize
  %>
  <tr align="center"> 
    <td><%=rs("id")%></td>
    <td><a href="book.asp?query=one_book&bookname=<%=rs("bookname")%>"><%=rs("bookname")%></a></td>
    <td ><a href="publishing.asp?p=<%=rs("publishing")%>" target="right"><%=rs("publishing")%></a></td>
	<td ><a href="book.asp?query=books_of_type&booktype=<%=rs("booktype")%>" target="right" ><%=rs("booktype")%></a></td>
    <td><%=rs("pdate")%></td>
    <td><%=rs("bookmoney")%>元</td>
	<td><%=rs("num")%></td>
	<td >
	<%if session("usertype")<>"" then '首先判断是否正常登陆，有权限
	if session("usertype")="yk" then
	response.Write"<a href='login.asp'>登陆</a> <a href='reg.asp'>注册</a>"
	end if
	if session("usertype")="admin" then  
	if rs("num") <=0 then
	response.Write("该书没有库存咯&nbsp;")
	end if
	%>
	<a href="book.asp?query=mod&id=<%=rs("id")%>">修改</a> <a href="book.asp?query=del&id=<%=rs("id")%>">删除</a>
	<%
	else
	end if
    if session("usertype")="user" then  
    if rs("num") >0 then
	%>
	<a href="borrow.asp?id=<%=rs("id")%>&userid=<%=session("userid")%>" target="right">借阅</a>
	<%
	else
	response.Write("该书没有库存咯&nbsp;")
	end if
	end if 
	%>
    <%else 'cookies过期，重新登陆
    response.write "<script>alert('cookies过期，重新登陆。。。');window.location.href='login.asp'</script>"
	end if
	%></td>
  </tr>
<%
  i=i+1
  rs.movenext
  loop
  rs.close
  set rs=nothing
  %>
  <%end if%>
</table>
<p align="center">
<%
response.write "总共"&pagecount1&"页,当前"&pagenum&"/"&pagecount1&", <a href=search.asp?pagenum=1&bookname="&bookname&"&booktype="&booktype&"&publishing="&publishing&"&money1="&money1&"&money2="&money2&"&date1="&date1&"&date2="&date2&"&date3="&date3&"&date11="&date11&"&date22="&date22&"&date33="&date33&">首页</a>"
%>&nbsp;
<%
if pagenum>1 then
response.write "<a href=search.asp?pagenum="&(pagenum-1)&"&bookname="&bookname&"&booktype="&booktype&"&publishing="&publishing&"&money1="&money1&"&money2="&money2&"&date1="&date1&"&date2="&date2&"&date3="&date3&"&date11="&date11&"&date22="&date22&"&date33="&date33&">上一页</a>&nbsp;"
else
response.write "上一页&nbsp;"
end if
if pagenum < trim(pagecount1) then
response.write "<a href=search.asp?pagenum="&(pagenum+1)&"&bookname="&bookname&"&booktype="&booktype&"&publishing="&publishing&"&money1="&money1&"&money2="&money2&"&date1="&date1&"&date2="&date2&"&date3="&date3&"&date11="&date11&"&date22="&date22&"&date33="&date33&">下一页</a>&nbsp;"
else
response.write "下一页"
end if
%>&nbsp;
<%
response.write "<a href=search.asp?pagenum="&pagecount1&"&bookname="&bookname&"&booktype="&booktype&"&publishing="&publishing&"&money1="&money1&"&money2="&money2&"&date1="&date1&"&date2="&date2&"&date3="&date3&"&date11="&date11&"&date22="&date22&"&date33="&date33&">尾页</a>"
%>
</p>
<br><br>
<div><a href="index.asp" target="right">首页</a>
&nbsp;&nbsp;&nbsp;<a href="javascript:history.go(-1)" target="right">返回</a>
</div>