Finde svar fra forrige side i paging
Hej eksperter!Jeg sidder pt. med det her script. Hvorfor finder jeg ud hvilke poster den træk ud på forrige side?
<%
nextPage = TRIM( Request("nextPage"))
IF nextPage = "" THEN nextPage = 1
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath ("/database/database.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT * FROM questions WHERE view=1 ORDER BY id ASC "
rs.Open Addera, Connect, 3, 3
rs.PageSize = 6
if not rs.EOF then
rs.AbsolutePage = nextPage
END IF
Do until rs.EOF OR rowCount = rs.PageSize
rowCount = rowCount + 1
rs.movenext
loop
%>
<%
FOR a = 1 to rs.PageCount
forrigeSide = nextPage - 1
IF a <> cINT( nextPage ) THEN %>
<br><input type="submit" value="Klik her for at komme til næste side" onclick="document.location.href='?Start=1&nextPage=<%=nextPage%>';" style="width:210; height:20;" class="SubmitButton">
<%
END IF
NEXT
%>
