ID
ID | 类型 | 名称 | 姓名 | 单位 | 添加时间 | 修改时间 | 编辑 |
sql="select * from advice where lever="&lever&""&sql_s&" order by id desc"
set rs=conn.execute(sql)
dim page
if rs.eof then response.end
rs.pagesize=20 '每页显示记录数
pagecount=rs.pagecount '确定该对象中数据的页数
page=int(request("page")) '当前页数的变量
if page<=0 then page=1
if request("page")="" then page=1
rs.absolutepage=page(这就是出错的63行)
rs1=rs.absolutepage '当前绝对页号
if not rs.eof then
for i=1 to rs.pagesize %>
&userid="> &userid=">查看"" then response.Write(" "&rs("other")&"")%>if rs.eof then exit for
next
end if %>
td height="35" align="left" valign="middle" width="405">
1 then %>
if page
当前页/共页
系统提示错误是:
错误类型:
ADODB.Recordset (0x800A0CB3)
当前记录集不支持书签。这可能是提供程序或选定的游标类型的限制。
/aqjshj/jysb/jy_manage.asp, 第 63 行
谢谢这位大军兄弟!你的问题找对的,按照你的修改出错没了且初次显示查询正确,但点击了下一页或最后页时查询条件值lever=1变了(我数据库中lever分别有-1,0,1,三个值) ,而且只变成lever=0,-1不会出现。我感觉自己有点钻牛角尖了,脑子糊了,还请点拨,再次谢谢!!!
sql="select * from advice where lever="&lever&""&sql_s&" order by id desc"
是不是应该在下面这条语句中也要加上条件才能确保增减页数后显示时lever的值始终=1啊。谢谢!
lever="&lever&""&sql_s&
展开