Paging nu igen.... ;)
kan någon se vad som är fel?
<%
nextPage = TRIM( Request( "nextPage" ) )
IF nextPage = "" THEN nextPage = 1
Set RecSet = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM add_forum Where svarid = '" & Request.Querystring("svarid") & "'"
RecSet.Open SQL, Databas
RecSet.PageSize = 10
RecSet.AbsolutePage = nextPage
Do until RecSet.EOF OR rowCount > RecSet.PageSize
rowCount = rowCount + 1
Response.Write "<font face=Verdana size=1>AV:"& RecSet("anvandarnamn")&"</font>"
RecSet.MoveNext
Loop
IF RecSet.PageCount > 1 THEN
FOR a = 1 to RecSet.PageCount
IF a <> cINT( nextPage ) THEN
Response.Write "<a href='thread.asp?nextPage="& a &"&svarid=" & Request.Querystring("svarid") & "'>"& a &"</a>"
ELSE
Response.Write " "& a
END IF
NEXT
END IF %>
felmess:
ADODB.Recordset error '800a0cb3'
Current Recordset does not support bookmarks. This may be a limitation of the provider or of the selected cursortype.
/forum/las.asp, line 22
22:
RecSet.AbsolutePage = nextPage
skumt som zlatan! skumt är också att det ligger en knapp i ASP/VB forumet... hahahaa