webForumDet fria alternativet

Problem med annons script

1 svar · 219 visningar · startad av Denniss

DennissMedlem sedan maj 2003176 inlägg
#1

Hej!

Jag behöver hjälp med asp koden i annons script.

Problemet: När jag skriver tex volvo får jag fram alla annonser med volvo tex 2 sidor har jag.Men när jag ska bläddra till sidan 2 hamnar jag på alla annonser.

Koden:

<%
sql = "select * from Annonser where 1 = 1 and accepterad = true"

if not Request("annonstyp") = checked then
sql = sql & " and annonstyp LIKE '%" & Request("annonstyp") & "%' "
end if

if LEN(Request("sok")) > 0 then
sql = sql & " and Rubrik LIKE '%" & Request("sok") & "%' "
end if

If Request.QueryString("queryKat") <> "" Then
sql = sql & " and kategori LIKE '%" & Request.QueryString("queryKat") & "%' "
queryKat = Request.QueryString("queryKat")
Else
if not Request.Form("kategori") = "0" then
sql = sql & " and kategori LIKE '%" & Request.Form("kategori") & "%' "
queryKat = Request.Form("kategori")
end if
End If

If Request.QueryString("queryReg") <> "" Then
sql = sql & " and region LIKE '%" & Request.QueryString("queryReg") & "%' "
queryReg = Request.QueryString("queryReg")
Else

if not Request.Form("region") = "0" then 
	sql = sql & " and region LIKE '%" & Request.Form("region") & "%' "
           queryReg =  Request.Form("region")

end if
end if

sql = sql & " order by datum DESC " 

Set recset = Server.Createobject("ADODB.Recordset") 
Const perSida = 20 
If Request.QueryString("page") = "" then 
	page = 1 
Else 
		page = Request.QueryString("page") 
End If 

RecSet.CursorLocation = 3
RecSet.CacheSize = perSida
recset.open SQL, "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("Annonser.mdb")&""
%>

Paging kod:

<a href="sok_annons_visa.asp?querykat=<%=querykat%>&page=<%=(Int(page)-1)%>&queryreg=<%=queryreg%>&page=<%=(Int(page)-1)%>" onFocus="this.blur()"><font size="1">« Föregående sida</font></a><font size="1"> |
<%Else%><%End If%>
<%
For Pages = 1 To TotalPages
%>
<%If (Int(Pages)) = (Int(page)) Then%> <%=Pages%>
<%Else%>
<a href="sokannons.asp?querykat=<%=querykat%>&page=<%=Pages%>&queryreg=<%=queryreg%>&page=<%=Pages%>" onFocus="this.blur()"><%=Pages%></a>
<%End If%>
<%Next%>
<%End If%>
<%
If (Int(page)) <> (Int(TotalPages)) Then
%>
| <a href="sokannons.asp?querykat=<%=querykat%>&page=<%=(Int(page)+1)%>&queryreg=<%=queryreg%>&page=<%=(Int(page)+1)%>" onFocus="this.blur()"><font size="1">Nästa sida »</font></a>

Någon som kan detta ?

solbulleMedlem sedan mars 20015 287 inlägg
#2

Du måste ju ta med dig de sökkriterier du först postat till din sida o byggt upp din sqlfråga med till din nästa sida där du kör frågan igen.
Se till att lägg till den datan i din länk till nästa sida.

132 ms totalt · 3 externa anrop · v20260731065814-full.3ab8d573
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
129 ms — hämta tråd, inlägg och bilagor (db)