Jaha, då är det väl något fel då. Förklara lite mer vad du menar med att det inte fungerar.
Var är resten av koden? Jag ser ingen paging-funktionalitet.
Varför har du 2 recordset? Rs2 verkar överflödigt.
2 svar · 202 visningar · startad av jboy_87
varför funkar inte paging scriptet??????????????????
SQL = "SELECT * FROM diskussioner WHERE Kategori LIKE '"& request.querystring("kategori") &"' ORDER BY Datum DESC"
Set rs = Server.Createobject("ADODB.Recordset")
Const perSida = 1
If Request.QueryString("page") = "" then
page = 1
Else
page = Request.QueryString("page")
End If
RS.CursorLocation = 3
RS.CacheSize = perSida
rs.open SQL, "Driver={Microsoft Access Driver (*.mdb)}; DBQ="& Server.Mappath("Database/Admin.mdb")
SQL2 = "SELECT * FROM Diskussioner WHERE kategori LIKE '"& request.querystring("Kategori")&"'"
Set rs2 = Server.Createobject("ADODB.Recordset")
rs2.open SQL2, "Driver={Microsoft Access Driver (*.mdb)}; DBQ="& Server.Mappath("Database/Admin.mdb")
Jaha, då är det väl något fel då. Förklara lite mer vad du menar med att det inte fungerar.
Var är resten av koden? Jag ser ingen paging-funktionalitet.
Varför har du 2 recordset? Rs2 verkar överflödigt.
onödigt för att det här funkar!!!!!!!
If TotalPages <> 1 Then
If (Int(page)) <> 1 Then
%><font face="Tahoma" size="1"> </font>
</font>
<span class="text">
<font size="1" face="Verdana"> <a href="visa_diskussioner.asp?page=<%=(Int(page)-1)%>" onFocus="this.blur()">
<font face="Tahoma" size="1"><b>« Bakåt</b></font></a></font><font size="1" face="Tahoma"> <font color="#006600"><b>|</b></font>
<%Else%> <b>« Bakåt</b> <font color="#006600"><b>|</b></font>
<%End If%>
<%
For Pages = 1 To TotalPages
%>
<%If (Int(Pages)) = (Int(page)) Then%> <font color="#000000"><b><%=Pages%></b></font>
<%Else%> </b> <font size="1" face="Verdana">
<a href="visa_diskussioner.asp?page=<%=Pages%>" onFocus="this.blur()"><b>
<font face="Tahoma" size="1"><%=Pages%></font></b></a></font><b>
<%End If%>
<%Next%>
<%End If%>
<%
If (Int(page)) <> (Int(TotalPages)) Then
%>
<font color="#006600"><b>|</b></font><font size="1" face="Verdana"><a onFocus="this.blur()" href="visa_diskussioner.asp?page=<%=(Int(page)+1)%>"><font face="Tahoma" size="1"><b> Framåt »</b></font></a><font face="Tahoma">
<%Else%>
<% end if %>