rs.AbsolutePage
Hej!Håber at der er nogen der kan hjælpe mig. Jeg får følgende fejl:
ADODB.Recordset error '800a0cb3'
Object or provider is not capable of performing requested operation.
/pics1.asp, line 12
Min Kode ser ud som følger:
<!--#include file="dbconn.asp"-->
<%
intPage = Request("page")
If isNumeric(intPage) = False Or intPage < 1 Then
intPage = 1
End If
sql = "SELECT * FROM pic"
SET rs = conn.Execute(sql)
If Not (rs.BOF Or rs.EOF) Then
rs.PageSize = 10
rs.AbsolutePage = intPage
intRecCount = rs.PageSize
intPageCount = rs.PageCount
Response.Write "<p><b>Side " & intPage & " af " & intPageCount & "</b></p>"
Do While Not rs.EOF And intRecCount > 0
Response.Write rs("LinkURL") & "<br>"
intRecCount = intRecCount - 1
rs.MoveNext
Loop
End If
rs.Close
Set rs = Nothing
Response.Write "<p>Gå til side "
For intNum = 1 To intPageCount
Response.Write "<a href=paging.asp?page=" & intNum & ">" & intNum & "</a> "
Next
Response.Write "<p>"
If Clng(intPage) > 1 Then
Response.Write "<a href=paging.asp?page=" & intPage - 1 & "><<</a>"
Else
Response.Write "<<"
End If
Response.Write " "
If Clng(intPage) < Clng(intPageCount) Then
Response.Write "<a href=paging.asp?page=" & intPage + 1 & ">>></a> "
Else
Response.Write ">>"
End If
%>
Min db-conn ser ud som følger:
Set conn = Server.CreateObject("ADODB.Connection")
connString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\.....sti.....\db.mdb;"
conn.open connString
Jeg får fejl i linien med rs.AbsolutePage.
Hvad er der galt??
MVH
Kongsted