---
title: "paging på söksida"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/83702-paging-på-söksida"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "lillen_009"
published: "2003-08-07T10:27:37.000Z"
updated: "2003-08-07T11:07:51.000Z"
replies: 4
views: 257
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/83702-paging-på-söksida"
---

# paging på söksida

## #1 — lillen_009, 2003-08-07T10:27Z

Har gjort en söksida (med Er hjälp :))

Nu har jag ett pagningscript till som fungerar till viss del. (har sökt). Första sidan fungerar som den ska, men klickar man på sida två tappar den bort sökvillkoren och jag får med alla poster (även de som inte har något med sökorden att göra). Jag tror felet ligger i att man måste skicka med värden till sidan två, men HUR?

```

<%

Set Con = Server.CreateObject("ADODB.Connection")
Con.Open "DRIVER={MySQL}; server=localhost; database=forum; uid=andreas; pwd=xxx;"
SQL = "SELECT COUNT(*) AS records FROM posts, members WHERE posts.author = members.memberID AND posts.msg like '%" & Request.Form("msg") & "%' AND members.membername like '%" & Request.Form("author") & "%' AND posts.forumID like '%" & Request.Form("ForumID") & "%' AND posts.header like '%" & Request.Form("header") & "%' AND posts.date > '%" & Request.Form("date1") & "%' '%" & Request.Form("date2") & "%' '%" & Request.Form("date3") & "%'"
Set rs = Con.execute(SQL)
intRecords = int(rs("records"))
rs.Close
Set rs = Nothing

intPage = Request.QueryString("page")
if intPage = "" OR not isNumeric(intPage) then
    intPage = int(1)
else
    intPage = int(intPage)
end if
intPageSize = int(2)
intStart = intPage*intPageSize
intStart = intStart-intPageSize
intPages = int(intRecords/intPageSize)+1
Set rs = Con.Execute("SELECT posts.* FROM posts, members WHERE posts.author = members.memberID AND posts.msg like '%" & Request.Form("msg") & "%' AND members.membername like '%" & Request.Form("author") & "%' AND posts.forumID like '%" & Request.Form("ForumID") & "%' AND posts.header like '%" & Request.Form("header") & "%' AND posts.date > '%" & Request.Form("date1") & "%' '%" & Request.Form("date2") & "%' '%" & Request.Form("date3") & "%' ORDER BY date DESC LIMIT " & intStart & ", " & intPageSize & ";")%>
<% 
IF rs.eof then
response.write "ingen träff" & "<br><br><a href=javascript:history.back()>Prova igen</a>"
Else
Do until rs.eof
response.write  RS("header") & "<br>"
rs.movenext
loop
End if
rs.Close
Set rs = Nothing%>
</table>
<% For i = 1 to intPages
    if i = intPage then
        Response.Write "<b>" & i & "</b> "
    else
        Response.Write "<a href=""search2.asp?page="& i & """>"
        Response.Write i
        Response.Write "</a> "
    end if
next

%>
```

Denna sida heter search2.asp
Sökformuläret heter search.asp

 :q

Permalänk: https://www.webforum.nu/p/83702

## #2 — @nders, 2003-08-07T10:31Z

I länken till nästa sida, skicka med sökvillkoren i querystringen. Se till att dina request hämtar från antingen .Form eller .Querystring, du vill kunna skicka med båda. Eller; ändra metoden i formuläret till GET, och använd endast Request.Querystring.

Mvh

Permalänk: https://www.webforum.nu/p/1131068

## #3 — lillen_009, 2003-08-07T10:39Z

Aha, så du menar att jag ska lägga in ett forumlär på ovanstående sida med hiddenvält som gömmer värdena, eller?

Permalänk: https://www.webforum.nu/p/1131079

## #4 — @nders, 2003-08-07T11:04Z

Njae, inte direkt vad jag menar, även om det går att lösa på det sättet. Så här hade jag gjort.

1) Ändrat method från post till get i formuläret.
2) Ändrat i sql-frågorna från request.form till request.querystring
3) Lägga till alla nödvändiga sökparametrar som querystrings i sidlänkarna, exempel:

```
Response.Write "<a href=""search2.asp?page="& i & "&msg=" & request.querystring("msg") &""">"
```

Nu lade jag bara till ett querystringvärde, för att du ska förstå vad jag menar.

Mvh

Permalänk: https://www.webforum.nu/p/1131088

## #5 — lillen_009, 2003-08-07T11:07Z

\[edit\]
nybörjarfel :(

Permalänk: https://www.webforum.nu/p/1131092

---

Tråden på webben: https://www.webforum.nu/amne/asp/83702-paging-på-söksida