UC知道有趣的asp分页问题 求救
来源：百度知道 编辑：UC知道 时间：2024/05/22 15:50:36
下面这段代码
asp+access
是asp分页的问题
如果数据库有8条记录 第一页显示7个 第二页就显示一个
但是现在显示第二页的时候 那一条记录显示出来了 但是下面跟着错误
错误是71行 就是for循环那一行
我知道是循环不对 应该有条件的 但是我不知道怎么写
高手来帮帮忙啊 我有212分 全部奉献了
大家要在我这段代码的基础上改啊
先谢谢了
<!-- #include file="conn.asp">
<%
exect="select * from info"
set rs=server.CreateObject("ADODB.Recordset")
rs.open exect,conn,1,1
%>
<%
rs.pagesize=7
pagecount=rs.pagecount
page=int(request("page"))
if page<=0 then page=1
if request("page")=" " then page=1
rs.absolutepage=page
%>
<html>
<head>
<title>分页</title>
</head>
<body>
<%
if rs.EOF and rs.BOF then
response.write ("暂时还没有文章")
else
for i=1 to rs.pagesize
response.write("编号:" & rs("ID"))
asp+access
是asp分页的问题
如果数据库有8条记录 第一页显示7个 第二页就显示一个
但是现在显示第二页的时候 那一条记录显示出来了 但是下面跟着错误
错误是71行 就是for循环那一行
我知道是循环不对 应该有条件的 但是我不知道怎么写
高手来帮帮忙啊 我有212分 全部奉献了
大家要在我这段代码的基础上改啊
先谢谢了
<!-- #include file="conn.asp">
<%
exect="select * from info"
set rs=server.CreateObject("ADODB.Recordset")
rs.open exect,conn,1,1
%>
<%
rs.pagesize=7
pagecount=rs.pagecount
page=int(request("page"))
if page<=0 then page=1
if request("page")=" " then page=1
rs.absolutepage=page
%>
<html>
<head>
<title>分页</title>
</head>
<body>
<%
if rs.EOF and rs.BOF then
response.write ("暂时还没有文章")
else
for i=1 to rs.pagesize
response.write("编号:" & rs("ID"))
循环处改为：(测试通过)
<%
if rs.EOF and rs.BOF then
response.write ("暂时还没有文章")
else
count=0
do while not(rs.eof or rs.bof)and count<rs.pagesize
response.write("编号:" & rs("ID"))
response.write("性别："& rs("i_sex"))
response.write("<hr>")
rs.MoveNext
count=count+1
end if
%>
for i=1 to rs.pagesize
if rs.eof then exit for
response.write("编号:" & rs("ID"))
response.write("性别："& rs("i_sex"))
response.write("<hr>")
rs.MoveNext
next
=========================================
i=0
while i<rs.pagesize and not rs.eof
.....
i=i+1
wend
我的分页，主要看怎么写分页的底下那部分
<!--#include file="conn.asp"-->
<%
page=clng(request.Que