webForumDet fria alternativet

Klurig sidor SQL..

1 svar · 227 visningar · startad av Bosse168

Bosse168Medlem sedan nov. 20031 019 inlägg
#1

hur gör man för att behålla sina formulär värden när man kör ett paging scirpt?
Koden nedan funkar så länge som jag inte byter sida:

Set Rs7 = Connect.Execute("SELECT COUNT(id) AS Antal From members Where username Like '%%" & Replace(Request.Form("username"),"'","''") & "%%' AND kon Like '%%"& Request.Form("kon") &"%%'" & _
" AND (to_days(current_date) - to_days(foddes))/365.2405 between "& sqlAge &" AND stad Like '%%"& Request.Form("stad") &"%%' AND lan Like '%%"& Request.Form("lan") &"%%' AND status Like '%%"& Request.Form("online") &"%%'" & _
" And bild_godkand Like '%%"& Request.Form("bild") &"%%'")

pageSize = 15
page = request.querystring("page")
if page = "" then page = 1
End if

pages = (Rs7("Antal")-1)/pageSize + 1

SQL = "Select * From members Where username Like '%%" & Replace(Request.Form("username"),"'","''") & "%%' AND kon Like '%%"& Request.Form("kon") &"%%'" & _
" AND (to_days(current_date) - to_days(foddes))/365.2405 between "& sqlAge &" AND stad Like '%%"& Request.Form("stad") &"%%' AND lan Like '%%"& Request.Form("lan") &"%%' AND status Like '%%"& Request.Form("online") &"%%'" & _
" And bild_godkand Like '%%"& Request.Form("bild") &"%%' Order By "& ordning &" limit " & (page-1)*pagesize & "," & pageSize

Set RecSet = Connect.Execute(SQL)
LarsGMedlem sedan dec. 200012 465 inlägg
#2

Du får väl lagra pagesize et.c. i session eller liknande (skicka som hidden fields eller i querystring.

Flyttas från SQL

Genererad på 371 ms · cache AV · v20260730165559-full.f96bc7eb