Jag har ett litet problem. Den läser ut rätt på första sidan men hittar inte när jag ska bläddra. Får följande fel:
Feltyp:
ADODB.Recordset (0x800A0BCD)
Antingen är BOF eller EOF satt till True, eller så har aktuell post raderats. Den begärda åtgärden kräver en aktuell post.
Detta gäller: RS.AbsolutePage = intPage
Set RS = Server.CreateObject("ADODB.Recordset")
RS.Open SQL, Connect, 1, 3
RS.PageSize = 3
X=0
If Request.QueryString("page") = "" OR NOT IsNumeric(Request.QueryString("page")) Then
intPage = 1
Else
intPage = CInt(Request.QueryString("page"))
End If
RS.AbsolutePage = intPage
DO UNTIL RS.EOF OR X = RS.PageSize
%>
<%=RS("posten")%>
<%
X=X+1
RS.MOVENEXT
LOOP
If RS.PageCount > 1 Then
For i = 1 To RS.PageCount
If i <> intPage Then
Response.Write("<a href=""?page=" & i & """>" & i &"</a> ")
Else
Response.Write("[" & i & "] ")
End If
Next
End If
RS.Close
Set RS = Nothing
Connect.Close
Set Connect = Nothing
%>