Dynamiskt RS??

Sitter med ett dynamiskt rs som jag ej får att fungera. Får följande felmeddelande:
ADODB.Recordset error '800a0cb3'
Current Recordset does not support bookmarks. This may be a limitation of the provider or of the selected cursortype. Line 163

På rad 163 finns följande kod:

rs.absolutePage = aktSida

<%
sql = "Select * from tbl_resturang Where stadID = "&request.querystring("stadID")&" And aktiv=1 Order By restNamn;"												
set rs = Server.CreateObject("ADODB.Recordset")
rs.CursorType = 3													
rs.Open sql, conn
rs.Pagesize=3
antSida = rs.PageCount
sida = request.querystring("sida")

If sida = "" Then 	
aktSida = 1
Else
aktSida = sida
End If
													
If antSida = 0 Then
%>
<tr>
  <td>Det finns inga poster!</td>
</tr>	
<%
  Else
    rs.absolutePage = aktSida
End If							
Do While x< rs.PageSize And Not rs.EOF			
%>
<tr>
<td>
 <%=rs("restNamn")%>
</td>
</tr>
<%
x = x + 1
rs.MoveNext
Loop
%>
<tr>		
<td>	
<%If cLng(aktSida) <> 1 Then%>
 <a href="andra.asp?sida=<%=aktSida-1%">Bakåt</a>
<%End If%>		
(Sida &nbsp;<%=aktSida%> &nbsp;av &nbsp;<%=rs.PageCount%>)
<%If cLng(aktSida) < cLng(rs.PageCount) Then%>
 <a href="andra.asp?sida=<%=aktsida+1%>">Framåt</a>
<%End If%>		
</td>
</tr>

Vad är det som är fel???