很急!!!为什么利用存储过程,取得的记录集就不支持AbslutePage

我已经把报错的地方和存储过程标出来了.请高手看以下
原文件代码如下:
<!--#include file="../INC/Security.asp" -->
<!--#include file="../../connection/#connect.asp"-->
<html>
<head> 
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<link rel="stylesheet" href="../CSS/M_style.css" type="text/css"></head>
<script language="JavaScript">
<!--
function CheckAll(form)
<!--
{
  for (var i=0;i<form.elements.length;i++)
    {
    var e = form.elements[i];
    if (e.name != 'chkall')
       e.checked = form.chkall.checked;
    }
  }function cf()
{
if(confirm("你真的要删除吗？"))
window.del.submit();
else
window.focus();
}function jump(url)
{
window.navigate(url);
}
-->
</script>
<script language="JavaScript">
<!--
function view(newsfile) { var gt = unescape('%3e');
var popup = null;
var over = "Launch Pop-up Navigator";
popup = window.open('', 'popupnav', 'width=600,height=420,resizable=1,scrollbars=yes');
if (popup != null) {
if (popup.opener == null) {
popup.opener = self;
}
popup.location.href = newsfile;
}
}function view2(newsfile) { var gt = unescape('%3e');
var popup = null;
var over = "Launch Pop-up Navigator";
popup = window.open('', 'popupnav', 'width=280,height=160,resizable=1,scrollbars=yes');
if (popup != null) {
if (popup.opener == null) {
popup.opener = self;
}
popup.location.href = newsfile;
}
}
// -->
</script>
<body leftmargin="0" topmargin="0">
  <table border=0 cellpadding=0 cellspacing=0 class=tb2>
  <TR> 
    <td> 
      <table  border=1 borderColor=<%=tdc2%> cellPadding=0 cellSpacing=0 width=100% style="border-collapse: collapse">
          <% 
 page=request.querystring("page")
  if page="" then
  page=1
  end if 
  pages = 1
set rs_topic = server.createobject("adodb.recordset") 
sql1 = "NEW_Ls"--------------------------------------------存储过程
rs_topic.open sql1,conn,1,1
if not(rs_topic.BOF or rs_topic.EOF) then
rs_topic.pagesize = pages 
maxpagecount=rs_topic.pagecount
r=cint(rs_topic.RecordCount)'记录总数
rs_topic.absolutepage = page '当前页数--------------------------报错出
rcount=0
pagestart=page-5
pageend=page+5
if pagestart<1 then
pagestart=1
end if
if pageend>maxpagecount then
pageend=maxpagecount
end if
 %>
          <% do while not rs_topic.eof and rcount <rs_topic.pagesize%>
          <% rs_topic.MoveNext 
rcount=rcount+1
loop 
%>
          <tr  align="left" height=23> 
            <td colspan="7" bgcolor=<%=tColor2%> class=tdc > <a href=list.asp?l_id=<%=request.querystring("l_id")%>&page=1><<</a> 
              <% for i=pagestart to pageend
            if i=0 then 
            i=1
            end if
            strurl="<a href=?l_id="&request.querystring("l_id")&"&page="&i&">["
            if i=cint(page) then
             strurl=strurl&"<font size=4><b>"&i&"</b></font>"
              else
              strurl=strurl&i 
              end if
              strurl=strurl&"]</a>"
             
            response.write strurl
response.write " "
 next
            %>
              <a href=default.asp?l_id=<%=request.querystring("l_id")%>&page=<%=maxpagecount%>>>></a> 
              ..</td>
          </tr>
          <%else%>
          <tr  align="center" height=23> 
            <td colspan="7" bgcolor=<%=tColor2%> class=tdc >暂无主题</td>
          </tr>
          <%
end if
rs_topic.close 
set rs_topic=nothing
%>
        </table>
    </td>
  </tr>
</table>  </center><div align="center">
  <center></td></tr>
    </table> 
  </center>
</div>
</body></html>