<%
set rs=server.createobject("adodb.recordset")
sql="select * from bigclass order by id asc"
rs.open sql,conn,1,1 %
<%
set rs1=server.createobject("adodb.recordset")
sql1="select * from news where bigclassname='"&rs("bigclassname")&"' order by id desc"
rs1.open sql1,conn,1,1 %>
<% rs1.pagesize=10 //每页显示十条
zongye=rs1.pagecount
page=int(request("page"))
if page<=0 then page=1
if request("page")=""then page=1
rs1.absolutepage=Page %>
<% if rs1.eof and rs1.bof then
response.write("暂时没有文章")
else
for i=1 to rs1.pagesize%>
<a href="show_news.asp?id=<%=rs1("id")%>"><%=rs1("title")%></a> <BR>
<%rs1.movenext
next
end if%>
如果数据库里只有十一条不足二十条的话他会报错误
ADODB.Field 错误 '80020009'
BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。
/more_news.asp,行 0
哪位知道的帮改下代码