请高手明指：分页代码中rs.absolutepage=page参数类型不对。。。

ADODB.Recordset (0x800A0BB9)
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
/display.asp, 第 24 行
<%
dim conn ,rs,sql,page

Set conn = Server.CreateObject("ADODB.Connection")

     connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("data/main.mdb")

      conn.Open connstr



     set rs = server.createobject("adodb.recordset")

     sql="select * from main"

     rs.open sql,conn,1,1

rs.pagesize=5
page=Request.QueryString("page")
rs.absolutepage=page   &--ADODB.Recordset (0x800A0BB9)
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。

%>

<%
for i= 1 to rs.pagesize
if rs.eof then
exit for
end if
%>
<%=rs("xm")%><br>
<%
rs.movenext
next
%>

<%if page=1 then%>
首页
<%else%>
<a href="?page=1">首页</a>
<%end if%>
<%if page=1 then%>
上一页
<%else%>
<a href="?page=<%=page-1%>">上一页</a>
<%end if%>
<% if rs.pagecount<page+1 then %>
下一页
<%else%>
<a href="?page=<%=page+1%>">下一页</a>
<%end if%>
<%if rs.pagecount<page+1 then%>
尾页
<%else%>
<a href="?page=<%=rs.pagecount%>">尾页</a>
<%end if%>