UC知道这段asp分页代码哪里错了啊？
来源：百度知道 编辑：UC知道 时间：2024/06/30 11:26:45
怎么不能实现分页功能啊？
谢谢
<!--#include file="conn.asp"-->
<%
b=request.querystring("b")
pa=request.querystring("p")
sqlstr="select * from fa_table where bankuai='"&b&"'"
set r=server.createobject("adodb.recordset")
r.open sqlstr,c,3,3
if pa="" then pa=1
r.absolutepage=pa
pagesize=2
r.pagesize=pagesize
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
&
谢谢
<!--#include file="conn.asp"-->
<%
b=request.querystring("b")
pa=request.querystring("p")
sqlstr="select * from fa_table where bankuai='"&b&"'"
set r=server.createobject("adodb.recordset")
r.open sqlstr,c,3,3
if pa="" then pa=1
r.absolutepage=pa
pagesize=2
r.pagesize=pagesize
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
&
if pa="" then pa=1
r.absolutepage=pa
pagesize=2
r.pagesize=pagesize
顺序反了，先定义每页多少记录，才可以指定第几页。
pagesize=2
r.pagesize=pagesize
if pa="" then pa=1
r.absolutepage=pa
难
<!-- #include file="conn.asp" -->
<%
dim m,n
set rs=server.CreateObject("adodb.recordset")
sqlstr="select * from sheet1 where 是否确认=0"
rs.open sqlstr,conn,3,3
if not(rs.eof or rs.bof) then
rs.pagesize=20 '定义一页显示的记录数目
tatalrecord=rs.recordcount '获取记录总数目
tatalpages=rs.pagecount '获取分页的数目
rs.movefirst
nowpage=request("page") '用request获取当前页数，注意page是自己定义的变量并非函数
if nowpage&"x"="x" then '处理页码为空时的情况
nowpage=1
else
nowpage=cint(nowpage) '将页码转换成数字型
end if
rs.absolutepage=nowpage '将指针移动到当前显示页的第一条记录
%>
<%
n=1
while not rs.eof and n<=rs.pages