UC知道rs.absolutepage=page停止在这一行！里面哪里出错了？
来源：百度知道 编辑：UC知道 时间：2024/06/09 04:23:52
<%
dim ipage,recno
set rs=server.CreateObject("adodb.recordset")
rs.open"select * from admin_tab order by land desc",conn,3,1
if rs.eof and rs.bof then
%>
<tr>
<td>请添加用户！</td>
<td colspan="4"> </td>
</tr>
<%
else
rs.pagesize=12
dim page
page=clng(request("page"))
if page="" then page=1
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page
for ipage=1 to rs.pagesize
recno=(page-1) * rs.pagesize + ipage
%>
<tr>
<td><%=rs("id")%></td>
<td><%=rs("name")%></td>
<td><%=rs("pwd")%></td>
dim ipage,recno
set rs=server.CreateObject("adodb.recordset")
rs.open"select * from admin_tab order by land desc",conn,3,1
if rs.eof and rs.bof then
%>
<tr>
<td>请添加用户！</td>
<td colspan="4"> </td>
</tr>
<%
else
rs.pagesize=12
dim page
page=clng(request("page"))
if page="" then page=1
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page
for ipage=1 to rs.pagesize
recno=(page-1) * rs.pagesize + ipage
%>
<tr>
<td><%=rs("id")%></td>
<td><%=rs("name")%></td>
<td><%=rs("pwd")%></td>
<%
dim ipage,recno,page
set rs=server.CreateObject("adodb.recordset")
rs.open"select * from admin_tab order by land desc",conn,3,1
if rs.eof and rs.bof then
%>
<tr>
<td>请添加用户！</td>
<td colspan="4"> </td>
</tr>
<%
else
rs.pagesize=12
page=trim(request("page"))
if page="" then
page=1
else
page=clng(page)
end if
if page<=0 then page=1 end if
if page>rs.pagecount then
page=rs.pagecount
end if
rs.AbsolutePage=page
for ipage=1 to rs.pagesize
recno=(page-1) * rs.pagesize + ipage
if rs.eof then exit for
%>
<tr>
<td><%=rs("id")%></td>
<td><%=rs("name")%></td>
<td><%=rs("pwd")%></td>
<td><%if rs("land&quo