asp后台分页了,数据也对,但展示的还是全部数据只有一页,求高手
%><%skey=request("i_search_txt")SetConn=Server.CreateObject("ADODB.Connection")Driver...
%>
<%
skey=request("i_search_txt")
Set Conn = Server.CreateObject("ADODB.Connection")
Driver1 = "DRIVER={SQL Server};Persist Security Info=False;Server="&strSQLServerName&";User ID=" & strSQLDBUserName & ";Password=" & strSQLDBPassword & ";Database=" & strSQLDBName & ";"
Conn.Open Driver1
sql="select * from lpay_cp where dg_Name LIKE'%" & skey & "%'"
rs.open sql,conn,3
rs.pagesize=150
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
%>
<table width="100%" border="0" align="center" cellpadding="5" cellspacing="1" class="td1">
<form name="form1" action="?action=tianjia" method="post">
<tr class="td4">
<td height="30" colspan="6" align="left" ><strong>系统商品 </strong>
<label>
<input type="button" name="Submit2" value="添加商品" onClick="location.href='?action=add'">
</label>
</td>
</tr>
<tr>
<tr class="td2">
<td width="49%" height="28" align="left" >标题</td>
<td width="13%" align="left" >所属类别</td>
<td width="6%" align="left" >价格</td>
<td width="9%" align="left" >管理员</td>
<td width="15%" align="left" >时间</td>
<td width="8%" align="left" >操作</td>
</tr>
<a href="dg_listcp.asp?skey=<%=skey%>&page=1">首页</a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=epage-1%>">上一页 </a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=page+1%>"><%=page+1%></a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=page+2%>"><%=page+2%></a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=page+3%>"><%=page+3%></a>
<span class="STYLE2">...</span>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=rs.pagecount-2%>"><%=rs.pagecount-2%></a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=rs.pagecount-1%>"><%=rs.pagecount-1%></a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=rs.pagecount%>"><%=rs.pagecount%></a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=epage+1%>">下一页</a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=rs.pagecount%>">末页</a>
<a >第<%=epage%>页 共<%=rs.pagecount%>页</a>
分页成功了,显示共多少页,现在第几页,但所有数据还是在这一个页面上。求帮助。 展开
<%
skey=request("i_search_txt")
Set Conn = Server.CreateObject("ADODB.Connection")
Driver1 = "DRIVER={SQL Server};Persist Security Info=False;Server="&strSQLServerName&";User ID=" & strSQLDBUserName & ";Password=" & strSQLDBPassword & ";Database=" & strSQLDBName & ";"
Conn.Open Driver1
sql="select * from lpay_cp where dg_Name LIKE'%" & skey & "%'"
rs.open sql,conn,3
rs.pagesize=150
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
%>
<table width="100%" border="0" align="center" cellpadding="5" cellspacing="1" class="td1">
<form name="form1" action="?action=tianjia" method="post">
<tr class="td4">
<td height="30" colspan="6" align="left" ><strong>系统商品 </strong>
<label>
<input type="button" name="Submit2" value="添加商品" onClick="location.href='?action=add'">
</label>
</td>
</tr>
<tr>
<tr class="td2">
<td width="49%" height="28" align="left" >标题</td>
<td width="13%" align="left" >所属类别</td>
<td width="6%" align="left" >价格</td>
<td width="9%" align="left" >管理员</td>
<td width="15%" align="left" >时间</td>
<td width="8%" align="left" >操作</td>
</tr>
<a href="dg_listcp.asp?skey=<%=skey%>&page=1">首页</a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=epage-1%>">上一页 </a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=page+1%>"><%=page+1%></a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=page+2%>"><%=page+2%></a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=page+3%>"><%=page+3%></a>
<span class="STYLE2">...</span>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=rs.pagecount-2%>"><%=rs.pagecount-2%></a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=rs.pagecount-1%>"><%=rs.pagecount-1%></a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=rs.pagecount%>"><%=rs.pagecount%></a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=epage+1%>">下一页</a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=rs.pagecount%>">末页</a>
<a >第<%=epage%>页 共<%=rs.pagecount%>页</a>
分页成功了,显示共多少页,现在第几页,但所有数据还是在这一个页面上。求帮助。 展开
展开全部
记录集分页后,记录集内的记录数量是不会变化的,只不过把记录指针移到了当前要显示的那一页的第一条记录上(比如你的代码中是每页150条记录,如果当前页是第2页,那么rs的位置会指向第151条记录,但rs内的记录总数是不会变化的),所以你不能用 do while not rs.eof ... loop 的循环方式来显示记录,要设置具体每页显示的记录条数,比如:
for i=1 to rs.pagesize
if rs.eof then exit for
'这里放显示每条记录的代码
rs.movenext
next
for i=1 to rs.pagesize
if rs.eof then exit for
'这里放显示每条记录的代码
rs.movenext
next
追问
还是不对,分页代码应该没错了,数字显示是正常的,多少条记录多少页.但显示有问题,所有数据在一页,怪事.
追答
你的页面显示部分的代码没有贴出来,所以无法帮你找出原因。你上面的代码只有“上一页 下一页”之类的,没有内容的。
展开全部
设置好分页后使用循环语句读取
while not rs.eof
显示内容
rs.movenext
wend
while not rs.eof
显示内容
rs.movenext
wend
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
在做循环的时候需要控制一下输出,限制为只循环多少条
例:do while (not rs.eof) and i<=pagesize
i=i+1
rs.movenext
loop
pagesize为输出的条数,根据需要自行设置
例:do while (not rs.eof) and i<=pagesize
i=i+1
rs.movenext
loop
pagesize为输出的条数,根据需要自行设置
追问
分页数据分好了,可好像就是不关页面什么事,它总是一页出完所有数据。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=epage-1%>">上一页 </a>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=epage+1%>">下一页</a>
这两行中
<%=epage+1%>
多了个e
应该是
<%=page+1%>
<a href="dg_listcp.asp?skey=<%=skey%>&page=<%=epage+1%>">下一页</a>
这两行中
<%=epage+1%>
多了个e
应该是
<%=page+1%>
追问
谢谢,但不是这个问题。数据还是一次性全显示出来。分页的那个位置数据却是对的。
追答
呵呵 抱歉 好久没碰ASP了 帮补了你了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
rs.pagesize=150
改小试试~
改小试试~
追问
不是大小的问题,都设置过了.
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询