<%
set conn=server.createobject("adodb.connection")
conn.open "dsn=xinda;uid=Welcome"
sqlexe="select * from movie_list where type=1"
set rspage=server.createobject("adodb.recordset")
rspage.open sqlexe,conn,1,3
rspage.pagesize=10
pagenum=rspage.pagecount
response.write("动作片共有"&pagenum&"页-----------------------<br>")
for i=1 to pagenum
rspage.absolutepage=i
rspage.movefirst
response.write("这是第"&i&"页----------------------------<br>")
for n=1 to rspage.pagesize
response.write("影片名："&rspage.fields("m_name").value&"          影片id是:"&rspage.fields("id").value&"<br>")
rspage.movenext
next
next
%>
结果每页都是同一样的内容，rspage.movefirst到底放那啊~只有这个地方不提示bof和eof错误
请大哥门指点一二

这个分页不全,我做的一个分页,供您参考一下吧: <% dim ipage,adCmdTable,p,i p=20 set rs=server.createobject("adodb.recordset") rs.open "select * from zf where id<>"&id&" order by id desc",conn,1,3,adCmdTable dim page page=request("page") if page=0 then ipage=1 else ipage=page end if if not rs.eof then rs.PageSize =p rs.AbsolutePage= ipage for i=1 to rs.PageSize If rs.eof Then Exit For %> <tr> <td align="center" bgcolor="#EEF3F9"> <p align="left">&nbsp; <a href="index.asp?id=<%=rs("id")%>">标题:<%=rs("zftitle")%></a><font color="#ADADAD">(第<%=rs("zfnum")%>期)</font></td> </tr>

<% 'rs.movenext 'loop 'set sql=nothing %> <% rs.movenext next end if %> <tr> <td align="center" bgcolor="#E8EFF7" colspan="4"> <p align="center">共<font color="#FF0000"><%=xxcount(0)-1%></font>条信息 　每页最多<font color="#FF0000"><%=p%></font>&nbsp; <%if ipage=1 then%> <font color="#FF0000"> <%=ipage%></font>/<%=rs.PageCount%>页 <%else%> <font color="#FF0000"> <%=ipage%></font>/<%=rs.PageCount%>页 <a target="_self" href="?page=<%=ipage-1%>&id=<%=id%>">上一页</a> <%end if%> <%if cint(ipage)=cint(rs.pagecount) or rs.PageCount=0 then%> <%else%> <a target="_self" href="?page=<%=ipage+1%>&id=<%=id%>">下一页</a> <%end if%> 第<%for i=1 to rs.pagecount%> <a target="_self" href="?page=<%=i%>&id=<%=id%>">[<%=i%>]</a> <%next%>页</p> 有问题大家解决，希望大家支持我，我的主页是：https://websamba.com/22644492 ,希望大家多多访问我的主页，帮我宣传宣传，我很乐于和大家交个朋友，谢谢支持邮箱是lxj19840308@163.com　,本站提供免费留言，希望大家支持，谢谢！我在一大网络公司工作，有问题可以问我，如果我知道的，一定和大家分享！