求助啊！关于查询后分页显示的 ASP编的

<%
  Set conn = Server.CreateObject("ADODB.Connection")
    DBPath = Server.MapPath("zaixiandati.mdb")
    conn.Open "driver={Microsoft Access Driver (*.mdb)}; dbq=" & DBPath
  set rs=server.CreateObject("adodb.recordset")
  findsql="select * from type_2 where question like '"&trim(request("search"))&"' order by id asc"
  rs.open findsql,conn,3,1,1
  rs.pagesize=2

  page=cint(request("page"))
' response.Write page
  'response.Write rs.absolutepage -1
  'response.Write typename(page1) long
  'response.Write  typename(rs.absolutepage)  long
  'response.Write rs.pagecount  6
  if page<1 then page=1
  if page>rs.pagecount then page=rs.pagecount
  rs.absolutepage=page  '出问题啦！就这
  for i=1 to rs.pagesize
%>
<table><tr>
<td><%=rs("id")%></td><td><%=rs("question")%></td></tr>

<%
rs.movenext
if rs.eof then exit for
next

%>
</table>
<%
if page<>1 then
%>
<a href="?page=1">第一页</a>
<a href='?page=<%=page-1%>'>上一页</a>
<%end if%>
<%
if page<>rs.pagecount then
%>
<a href='?page=<%=page+1%>'>下一页</a>
<a href='?page=<%=rs.pagecount%>'>最后一页</a>
<%end if
rs.close
conn.close%>

<body>
<form name="form2" method="get">
<input type="text" name="search">
<input type="submit" value="search">
</form>
<form name="form1" method="get">
<input type="text" name="page">
<input type="submit" value="goto"></form>
</body>
</html>

如果不查询但分页显示，没问题  但是查询以后就有问题了
问题如下：

错误类型：
ADODB.Recordset (0x800A0BB9)
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
/fenye.asp, 第 19 行
也就是语句：rs.absolutepage=page --------------------编程问答-------------------- asp不会，帮顶

补充：.NET技术 ,  ASP.NET