UC知道ASP查询分页显示问题
来源：百度知道 编辑：UC知道 时间：2024/05/04 10:11:25
<body>
<!--#include file="conn.asp" -->
<!--#include file="top.asp" -->
<%
query=request("query")
set rs=server.CreateObject("adodb.recordset")
sql = "select * from news where title like '%"&query&"%'"
rs.open sql,conn,1,1
do while not rs.eof
%>
<table width="750" border="1" align="center">
<tr>
<td bgcolor="#FFCCCC"><div align="center"><a href="#" onclick="window.open('query2.asp?newsid=<%=rs("newsid")%>','infowin','width=400,height=600,scrollbars=true,resizalbe=false')"><%=rs("title")%></div></td>
</tr>
</table>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>
怎么样在里面添加分页显示，在里面插入语句回答谢谢
<!--#include file="conn.asp" -->
<!--#include file="top.asp" -->
<%
query=request("query")
set rs=server.CreateObject("adodb.recordset")
sql = "select * from news where title like '%"&query&"%'"
rs.open sql,conn,1,1
do while not rs.eof
%>
<table width="750" border="1" align="center">
<tr>
<td bgcolor="#FFCCCC"><div align="center"><a href="#" onclick="window.open('query2.asp?newsid=<%=rs("newsid")%>','infowin','width=400,height=600,scrollbars=true,resizalbe=false')"><%=rs("title")%></div></td>
</tr>
</table>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>
怎么样在里面添加分页显示，在里面插入语句回答谢谢
<%
query=request("query")
set rs=server.CreateObject("adodb.recordset")
sql = "select * from news where title like '%"&query&"%'"
rs.open sql,conn,1,1
rs.pagesize=10 '这里是多少项每页,只要改这个就行了
if request("page")<>"" then
epage=cint(request("page"))
if epage<1 then epage=1
if epage>rs.pagecount then epage=rs.pagecount
else
epage=1
end if
rs.absolutepage=epage
for ii=0 to rs.pagesize-1
if rs.bof or rs.eof then exit for
%>
<table width="750" border="1" align="center">
<tr>
<td bgcolor="#FFCCCC"><div align="center"><a href="#" onclick="window.open('query2.asp?newsid=<%=rs("newsid")%>','infowin','width=400,height=600,scrollbars=true,resizalbe=false