ASP搜索后翻页,显示全部记录. 下面是源码,求高手指点迷津...
<!--#INCLUDEFILE="conn.asp"--><%bt=request("bt")content=request("content")setrs=serve...
<!--#INCLUDE FILE="conn.asp"-->
<% bt=request("bt")
content=request("content")
set rs=server.createobject("adodb.recordset")
if bt="tt" then
sql ="select * from news where (title like '%"&content&"%') order by add_time Desc"
else
sql ="select * from news where (content like '%"&content&"%') or (title like '%"&content&"%') order by add_time Desc"
end if
rs.Open sql,conn,1,3
PageSize=20
%><!--#INCLUDE FILE="page_up_down.asp"-->
<body bgcolor="#CDD5DE">
<table width="95%" border="0" cellspacing="1" cellpadding="0" align="center" class="tablebody">
<tr>
<td><table width="100%" border="0" cellpadding="5" cellspacing="0">
<tr>
<th>共找出含 <span class="STYLE1"><%= content %> </span>的文章共 <span class="STYLE3"><%=RecordCount%> </span>篇</th>
</tr>
</table></td>
</tr>
<tr>
<td bgcolor="#FFFFFF"><table width="100%" border="0" cellspacing="1" cellpadding="5">
<tr align="center" bgcolor="#A5B3C2">
<td>编 号</td>
<td>名 称</td>
<td>类 型</td>
<td>是 否 显 示 </td>
<td>操 作</td>
</tr>
<%
if rs.eof then
response.write ("<tr><td bgcolor='#F3F5F8' colspan='5'>对不起，没有任何数据！</td></tr>")
else
do while not rs.eof
if processedrecord >=pagesize then
exit do
end if
id=rs("id")
n_type=rs("n_type")
title=rs("title")
n_from=rs("n_from")
hh=rs("show")
%>
<tr bgcolor="#F3F5F8" onMouseOver="javascript:this.bgColor='#D5D5D5';" onMouseOut="javascript:this.bgColor='#F3F5F8';">
<td width="10%" align="center"><%=id%></td>
<td width="44%">
<%if n_type="最新状态" then %>
<%=rs("content")%>
<% Else %>
<a href="../news_show.asp?id=<%=rs("id")%>" target="_blank"><%=title%></a>
<% End If %>
</td>
<td width="13%" align="center"><%=rs("n_type")%></td>
<td width="13%" align="center">
<% If hh="0" Then %>
显示
<% Else %>
<span class="STYLE1">隐藏</span>
<% End If %></td>
<td width="20%" align="center"><a href="change_news.asp?id=<%=id%>"><img src="images/mod.gif" width="45" height="20" border="0" align="absmiddle"></a> <a href="del_news.asp?id=<%=id%>"><img src="images/delete.gif" width="45" border="0" height="20" align="absmiddle"></a></td>
</tr>
<%
processedrecord=processedrecord+1
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</table></td>
</table>
<table width="75%" border="0" cellspacing="1" cellpadding="1" align="center">
<form action="manage_news.asp" method="post">
<tr height="25">
<td align="right">总记录数：<%=RecordCount%> 每页显示：<%=PageSize%> 总计页数：<%=pagecount%> 当前页数：<%=Page_No%>
<%if page_no>1 then%>
<a href="?page_no=<%=page_no-1%>">上一页</a> |
<%end if%>
<a href="?page_no=<%=page_no%>">刷新</a>
<%if page_no<pagecount then%>
| <a href="?page_no=<%=page_no+1%>">下一页</a>
<%end if%>
转到第
<select name="page_no" size="1">
<option value="<%=page_no%>" selected><%=Page_No %></option>
<%For i=1 to pagecount%>
<option value="<%=i%>"><%=i%></option>
<%Next%>
</select>
页
<input type="submit" value="GO">
</td>
</tr>
</form>
</table>
</body>
</html> 展开
<% bt=request("bt")
content=request("content")
set rs=server.createobject("adodb.recordset")
if bt="tt" then
sql ="select * from news where (title like '%"&content&"%') order by add_time Desc"
else
sql ="select * from news where (content like '%"&content&"%') or (title like '%"&content&"%') order by add_time Desc"
end if
rs.Open sql,conn,1,3
PageSize=20
%><!--#INCLUDE FILE="page_up_down.asp"-->
<body bgcolor="#CDD5DE">
<table width="95%" border="0" cellspacing="1" cellpadding="0" align="center" class="tablebody">
<tr>
<td><table width="100%" border="0" cellpadding="5" cellspacing="0">
<tr>
<th>共找出含 <span class="STYLE1"><%= content %> </span>的文章共 <span class="STYLE3"><%=RecordCount%> </span>篇</th>
</tr>
</table></td>
</tr>
<tr>
<td bgcolor="#FFFFFF"><table width="100%" border="0" cellspacing="1" cellpadding="5">
<tr align="center" bgcolor="#A5B3C2">
<td>编 号</td>
<td>名 称</td>
<td>类 型</td>
<td>是 否 显 示 </td>
<td>操 作</td>
</tr>
<%
if rs.eof then
response.write ("<tr><td bgcolor='#F3F5F8' colspan='5'>对不起，没有任何数据！</td></tr>")
else
do while not rs.eof
if processedrecord >=pagesize then
exit do
end if
id=rs("id")
n_type=rs("n_type")
title=rs("title")
n_from=rs("n_from")
hh=rs("show")
%>
<tr bgcolor="#F3F5F8" onMouseOver="javascript:this.bgColor='#D5D5D5';" onMouseOut="javascript:this.bgColor='#F3F5F8';">
<td width="10%" align="center"><%=id%></td>
<td width="44%">
<%if n_type="最新状态" then %>
<%=rs("content")%>
<% Else %>
<a href="../news_show.asp?id=<%=rs("id")%>" target="_blank"><%=title%></a>
<% End If %>
</td>
<td width="13%" align="center"><%=rs("n_type")%></td>
<td width="13%" align="center">
<% If hh="0" Then %>
显示
<% Else %>
<span class="STYLE1">隐藏</span>
<% End If %></td>
<td width="20%" align="center"><a href="change_news.asp?id=<%=id%>"><img src="images/mod.gif" width="45" height="20" border="0" align="absmiddle"></a> <a href="del_news.asp?id=<%=id%>"><img src="images/delete.gif" width="45" border="0" height="20" align="absmiddle"></a></td>
</tr>
<%
processedrecord=processedrecord+1
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</table></td>
</table>
<table width="75%" border="0" cellspacing="1" cellpadding="1" align="center">
<form action="manage_news.asp" method="post">
<tr height="25">
<td align="right">总记录数：<%=RecordCount%> 每页显示：<%=PageSize%> 总计页数：<%=pagecount%> 当前页数：<%=Page_No%>
<%if page_no>1 then%>
<a href="?page_no=<%=page_no-1%>">上一页</a> |
<%end if%>
<a href="?page_no=<%=page_no%>">刷新</a>
<%if page_no<pagecount then%>
| <a href="?page_no=<%=page_no+1%>">下一页</a>
<%end if%>
转到第
<select name="page_no" size="1">
<option value="<%=page_no%>" selected><%=Page_No %></option>
<%For i=1 to pagecount%>
<option value="<%=i%>"><%=i%></option>
<%Next%>
</select>
页
<input type="submit" value="GO">
</td>
</tr>
</form>
</table>
</body>
</html> 展开
展开全部
在上一页，下一页等翻页连接后加上参数 "?page_no=<%=page_no+1%>&bt=<%=bt%>&content=<%=content%>
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
搞不明白你要问什么
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
