---
title: "HJÄLP Paging!!"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/154281-hjälp-paging/page2"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Jeppeweb"
published: "2006-11-28T07:31:27.000Z"
updated: "2006-12-14T12:34:33.000Z"
replies: 61
views: 1534
page: 2
pages: 4
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/154281-hjälp-paging"
---

# HJÄLP Paging!!

_Sida 2 av 4._

## #21 — voigtann1, 2006-11-28T11:43Z

```
response.write "<a href='" & server.HTMLEncode(request.Querystring("epost")) ...
```

du kan inte använda \<%= i en response..

```
<!--#include file="functions.asp"-->
<!--#include file="databaskopplingar.asp"-->
<!--#include file="includes/db.asp" -->

<%
'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'//
'//		© 2003
'//		Pagingsystem med GetRows()
'//		Skapat 23 Maj 2003 av Palle Zingmark
'//		[url]www.palleman.nu[/url] | [email]info@palleman.nu[/email]
'//
'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'// Dim

	Dim Connect, RecSet, arrRecSet, intPage, intPostsPerPage, intFirstPost, intTotalPosts
	Dim intPages, intLastPost, strNext, i, strName, intNavStart, intNavEnd, n

'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'// Databashantering

set connect = server.createobject("ADODB.connection")
connect.Open "DRIVER={MySQL ODBC 3.51 Driver};S

dim SQL
sql = "Select TradID,rubrik,epost,username,datum from forum where kat='"&safeSQL(Request.Querystring("kat"))&"'" & " and svar='Nej'" & " order by datum desc"
	Set RecSet = Connect.Execute(sql)
		If NOT RecSet.EOF Then arrRecSet = RecSet.GetRows()
	RecSet.Close : Set RecSet = Nothing
	
Connect.Close
Set Connect = Nothing

'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'// Posthantering

If IsArray(arrRecSet) Then

	'// Poster per sida
	intPostsPerPage = 10

	'// Navigeringshantering
	If Len(trim(Request.Querystring("n"))) > 0 Then intPage = cInt(trim(Request.Querystring("n"))) Else intPage = 1
	intFirstPost = (intPage - 1) * intPostsPerPage
	intTotalPosts = UBound(arrRecSet, 2)
	intPages = ((intTotalPosts)\intPostsPerPage)+1

	If intFirstPost + (intPostsPerPage - 1) >= UBound(arrRecSet,2) Then
		intLastPost = UBound(arrRecSet, 2) 
	Else
		intLastPost = intFirstPost + (intPostsPerPage - 1)
		strNext = True
	End If

	'// Skriv ut posterna
	For i = intFirstPost To intLastPost
TradID = arrRecSet(0,i)
strRubrik = arrRecSet(1,i)
strepost = arrRecSet(2,i)
strusername = arrRecSet(3,i)
strdatum = arrRecSet(4,i)

%>

<table class="tbl" width="586">
<tr><td><table class="tbl2" width="580" cellspacing="0" cellpadding="0">

<tr><td colspan="3"><a href="main.asp?page=87">Kategori</a> » <%=Server.Htmlencode(Request.Querystring("kat"))%></td></tr>
<tr>
	<td width='30' height='21'>
	&nbsp;</td><td width="449">&nbsp;</td><td align='left' width="100">
	<b><a href="main.asp?page=92"><font color="#000000">Skapa ny tråd</font></a></b></td>
</tr>
<tr>
	<td width='30' height='21'>
	&nbsp;</td><td width="449"><b>Trådar:</b></td><td align='left' width="100">
	<b>Antal svar:</b></td>
</tr>
<!-- #include file="includes/color.asp" -->
<tr class='<%=color%>'><td width='30' height='40'>
	<p align="center"><img src='bilder/forum.png' alt=""></td>
 <td width="449"><b><a href='main.asp?page=93&tradid=<%=Server.HtmlEncode(TradID)%>'><%=Server.HtmlEncode(strRubrik)%></a></b><%

	// Skriver ut trådarna, samt räknar hur många svar det är i varje tråd.
	Set Count = ObjConn.Execute("Select count(*) from forum where svar='Ja'" & " and tradID='"&SafeSQL(TradID)&"'")
%> skapades av <a href="<%=Server.HtmlEncode(strepost)%>"><%=Server.HtmlEncode(strusername)%></a><br>&nbsp;<%=strDatum%></td>
	<td align='left' width="100"><br><%=Count(0)%> st</td></tr><%
	Count.Close : Set Count = Nothing
%></table></table>

<%

	Next

	'// Navigering, välj själv knappar eller text
	Call buttonNavigate(intPage, intTotalPosts, intPostsPerPage, intPages)
	'Call textNavigate(intPage, intTotalPosts, intPostsPerPage, intPages)

'// Fanns inga poster
Else
	Response.Write "Här var det tomt.. fyll på i databasen bums. =)"

End If

'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
%>
```

Nöjd nu?

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

## #22 — Jeppeweb, 2006-11-28T11:56Z

grymt massa tack .. men :$

Microsoft VBScript compilation error '800a041f' 

Unexpected 'Next' 

/cat_open.asp, line 93 

Next
^
 

tar bort Next och får.. 

Microsoft VBScript compilation error '800a03fb' 

Expected 'Loop' 

/cat_open.asp, line 98 

Else
^

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

## #23 — voigtann1, 2006-11-28T12:01Z

```
<!--#include file="functions.asp"-->
<!--#include file="databaskopplingar.asp"-->
<!--#include file="includes/db.asp" -->

<%
'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'//
'//		© 2003
'//		Pagingsystem med GetRows()
'//		Skapat 23 Maj 2003 av Palle Zingmark
'//		[url]www.palleman.nu[/url] | [email]info@palleman.nu[/email]
'//
'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'// Dim

	Dim Connect, RecSet, arrRecSet, intPage, intPostsPerPage, intFirstPost, intTotalPosts
	Dim intPages, intLastPost, strNext, i, strName, intNavStart, intNavEnd, n

'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'// Databashantering

set connect = server.createobject("ADODB.connection")
connect.Open "DRIVER={MySQL ODBC 3.51 Driver};S

dim SQL
sql = "Select TradID,rubrik,epost,username,datum from forum where kat='"&safeSQL(Request.Querystring("kat"))&"'" & " and svar='Nej'" & " order by datum desc"
	Set RecSet = Connect.Execute(sql)
		If NOT RecSet.EOF Then arrRecSet = RecSet.GetRows()
	RecSet.Close : Set RecSet = Nothing
	
Connect.Close
Set Connect = Nothing

'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'// Posthantering

If IsArray(arrRecSet) Then
	'// Poster per sida
	intPostsPerPage = 10

	'// Navigeringshantering
	If Len(trim(Request.Querystring("n"))) > 0 Then intPage = cInt(trim(Request.Querystring("n"))) Else intPage = 1
	intFirstPost = (intPage - 1) * intPostsPerPage
	intTotalPosts = UBound(arrRecSet, 2)
	intPages = ((intTotalPosts)\intPostsPerPage)+1

	If intFirstPost + (intPostsPerPage - 1) >= UBound(arrRecSet,2) Then
		intLastPost = UBound(arrRecSet, 2) 
	Else
		intLastPost = intFirstPost + (intPostsPerPage - 1)
		strNext = True
	End If

	'// Skriv ut posterna
	For i = intFirstPost To intLastPost
          TradID = arrRecSet(0,i)
          strRubrik = arrRecSet(1,i)
          strepost = arrRecSet(2,i)
          strusername = arrRecSet(3,i)
          strdatum = arrRecSet(4,i)
          Set Count = ObjConn.Execute("Select count(*) from forum where svar='Ja'" & " and tradID='"&SafeSQL(TradID)&"'")
          antal = Count(0)
          count.close : set Count = nothing
%>
<table class="tbl" width="586">
<tr><td><table class="tbl2" width="580" cellspacing="0" cellpadding="0">

<tr><td colspan="3"><a href="main.asp?page=87">Kategori</a> » <%=Server.Htmlencode(Request.Querystring("kat"))%></td></tr>
<tr>
	<td width='30' height='21'>
	&nbsp;</td><td width="449">&nbsp;</td><td align='left' width="100">
	<b><a href="main.asp?page=92"><font color="#000000">Skapa ny tråd</font></a></b></td>
</tr>
<tr>
	<td width='30' height='21'>
	&nbsp;</td><td width="449"><b>Trådar:</b></td><td align='left' width="100">
	<b>Antal svar:</b></td>
</tr>
<!-- #include file="includes/color.asp" -->
<tr class='<%=color%>'><td width='30' height='40'>
	<p align="center"><img src='bilder/forum.png' alt=""></td>
 <td width="449"><b><a href='main.asp?page=93&tradid=<%=Server.HtmlEncode(TradID)%>'><%=Server.HtmlEncode(strRubrik)%></a></b>skapades av <a href="<%=Server.HtmlEncode(strepost)%>"><%=Server.HtmlEncode(strusername)%></a><br>&nbsp;<%=strDatum%></td>
	<td align='left' width="100"><br><%=antal%> st</td></tr></table></table>
<%

	Next

	'// Navigering, välj själv knappar eller text
	Call buttonNavigate(intPage, intTotalPosts, intPostsPerPage, intPages)
	'Call textNavigate(intPage, intTotalPosts, intPostsPerPage, intPages)

'// Fanns inga poster
Else
	Response.Write "Här var det tomt.. fyll på i databasen bums. =)"
End If
'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
%>
```

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

## #24 — Jeppeweb, 2006-11-28T12:05Z

Microsoft VBScript compilation error '800a041f' 

Unexpected 'Next' 

/cat_open.asp, line 86 

Next
^
 
:$

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

## #25 — voigtann1, 2006-11-28T12:12Z

```
<!--#include file="functions.asp"-->
<!--#include file="databaskopplingar.asp"-->
<!--#include file="includes/db.asp" -->
<!-- #include file="includes/color.asp" -->
<%
'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'//
'//		© 2003
'//		Pagingsystem med GetRows()
'//		Skapat 23 Maj 2003 av Palle Zingmark
'//		[url]www.palleman.nu[/url] | [email]info@palleman.nu[/email]
'//
'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'// Dim

	Dim Connect, RecSet, arrRecSet, intPage, intPostsPerPage, intFirstPost, intTotalPosts
	Dim intPages, intLastPost, strNext, i, strName, intNavStart, intNavEnd, n

'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'// Databashantering

set connect = server.createobject("ADODB.connection")
connect.Open "DRIVER={MySQL ODBC 3.51 Driver};S

dim SQL
sql = "Select TradID,rubrik,epost,username,datum from forum where kat='"&safeSQL(Request.Querystring("kat"))&"'" & " and svar='Nej'" & " order by datum desc"
	Set RecSet = Connect.Execute(sql)
		If NOT RecSet.EOF Then arrRecSet = RecSet.GetRows()
	RecSet.Close : Set RecSet = Nothing
	
Connect.Close
Set Connect = Nothing

'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'// Posthantering

If IsArray(arrRecSet) Then
	'// Poster per sida
	intPostsPerPage = 10

	'// Navigeringshantering
	If Len(trim(Request.Querystring("n"))) > 0 Then intPage = cInt(trim(Request.Querystring("n"))) Else intPage = 1
	intFirstPost = (intPage - 1) * intPostsPerPage
	intTotalPosts = UBound(arrRecSet, 2)
	intPages = ((intTotalPosts)\intPostsPerPage)+1

	If intFirstPost + (intPostsPerPage - 1) >= UBound(arrRecSet,2) Then
		intLastPost = UBound(arrRecSet, 2) 
	Else
		intLastPost = intFirstPost + (intPostsPerPage - 1)
		strNext = True
	End If

	'// Skriv ut posterna
	For i = intFirstPost To intLastPost
          TradID = arrRecSet(0,i)
          strRubrik = arrRecSet(1,i)
          strepost = arrRecSet(2,i)
          strusername = arrRecSet(3,i)
          strdatum = arrRecSet(4,i)
          Set Count = ObjConn.Execute("Select count(*) from forum where svar='Ja'" & " and tradID='"&SafeSQL(TradID)&"'")
          antal = Count(0)
          count.close : set Count = nothing
          response.write "<table class='tbl' width='586'>"
          response.write "<tr><td><table class='tbl2' width='580' cellspacing='0' cellpadding='0'>"
          response.write "<tr><td colspan='3'><a href='main.asp?page=87'>Kategori</a> » " & Server.Htmlencode(Request.Querystring("kat")) & "</td></tr>"
          response.write "<tr>"
          response.write "	<td width='30' height='21'>"
          response.write "	&nbsp;</td><td width='449'>&nbsp;</td><td align='left' width='100'>"
          response.write "	<b><a href='main.asp?page=92'><font color='#000000'>Skapa ny tråd</font></a></b></td>"
          response.write "</tr>"
          response.write "<tr>"
          response.write "	<td width='30' height='21'>"
          response.write "	&nbsp;</td><td width='449'><b>Trådar:</b></td><td align='left' width='100'>"
          response.write "	<b>Antal svar:</b></td>"
          response.write "</tr>"
          response.write "<tr class='" & color & "'><td width='30' height='40'>"
          response.write "	<p align='center'><img src='bilder/forum.png' alt=''></td>"
          response.write " <td width='449'><b><a href='main.asp?page=93&tradid=" & Server.HtmlEncode(TradID) & "'>" & Server.HtmlEncode(strRubrik) & "</a></b>skapades av <a href='" & Server.HtmlEncode(strepost) & "'>" & Server.HtmlEncode(strusername) & "</a><br>&nbsp;" & strDatum & "</td>"
          response.write "	<td align='left' width='100'><br>" & antal & " st</td></tr></table></table>"
	Next

	'// Navigering, välj själv knappar eller text
	Call buttonNavigate(intPage, intTotalPosts, intPostsPerPage, intPages)
	'Call textNavigate(intPage, intTotalPosts, intPostsPerPage, intPages)

'// Fanns inga poster
Else
	Response.Write "Här var det tomt.. fyll på i databasen bums. =)"
End If
'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
%>
```

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

## #26 — Jeppeweb, 2006-11-28T12:17Z

Microsoft VBScript compilation error '800a03fb' 

Expected 'Loop' 

/cat_open.asp, line 91 
 
tack för hjälpen

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

## #27 — voigtann1, 2006-11-28T12:19Z

cat_open.asp är det ens den filen jag håller på att skriva?

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

## #28 — Jeppeweb, 2006-11-28T12:28Z

Yesbox

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

## #29 — voigtann1, 2006-11-28T12:35Z

det kan inte stämma.. då rad 91 för mig är en ' kommentar...

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

## #30 — Jeppeweb, 2006-11-28T12:42Z

tog bort 'kommentaren och nu hamnar vi helt plötsligt på rad 89 vilket är "End if" .. så felet måste väll ligga runt omkring dessa rader..?

```
	Next

	'// Navigering, välj själv knappar eller text
	Call buttonNavigate(intPage, intTotalPosts, intPostsPerPage, intPages)
	'Call textNavigate(intPage, intTotalPosts, intPostsPerPage, intPages)

'// Fanns inga poster
Else
	Response.Write "Här var det tomt.. fyll på i databasen bums. =)"
End If
%>
```

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

## #31 — voigtann1, 2006-11-28T12:43Z

du...

```
connect.Open "DRIVER={MySQL ODBC 3.51 Driver};5
```

ska väl ändå vara

```
connect.Open "DRIVER={MySQL ODBC 3.51 Driver};"
```

  Det är inte så lätt att hjälpa dig om du ta bort koder / kommentarer ...

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

## #32 — Jeppeweb, 2006-11-28T12:50Z

Hade SERVER, PASS o sånt där innan.. tog såklart bort de innan jag postade här.. men de e var saksamma.. samma effekt med connect.Open "DRIVER={MySQL ODBC 3.51 Driver};"

iallafall.. ligger fortf på samma felmeddelande :S

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

## #33 — voigtann1, 2006-11-28T12:55Z

och felmeddelandet lyder?
jag ger snart upp här... har spenderat för mycket tid idag på detta..

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

## #34 — Jeppeweb, 2006-11-28T12:56Z

cat_open.asp

```
<!--#include file="functions.asp"-->
<!--#include file="databaskopplingar.asp"-->
<!--#include file="includes/db.asp" -->
<!--#include file="includes/color.asp" -->
<%
'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'//
'//		© 2003
'//		Pagingsystem med GetRows()
'//		Skapat 23 Maj 2003 av Palle Zingmark
'//		www.palleman.nu | info@palleman.nu
'//
'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'// Dim

	Dim Connect, RecSet, arrRecSet, intPage, intPostsPerPage, intFirstPost, intTotalPosts
	Dim intPages, intLastPost, strNext, i, strName, intNavStart, intNavEnd, n

'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'// Databashantering

set connect = server.createobject("ADODB.connection")
connect.Open "DRIVER={MySQL ODBC 3.51 Driver};"

dim SQL
sql = "Select TradID,rubrik,epost,username,datum from forum where kat='"&safeSQL(Request.Querystring("kat"))&"'" & " and svar='Nej'" & " order by datum desc"
	Set RecSet = Connect.Execute(sql)
		If NOT RecSet.EOF Then arrRecSet = RecSet.GetRows()
	RecSet.Close : Set RecSet = Nothing
	
Connect.Close
Set Connect = Nothing

'//---------------------------------------------------------------------------------------------------------------------------------------------------------------
'// Posthantering

If IsArray(arrRecSet) Then
	'// Poster per sida
	intPostsPerPage = 10

	'// Navigeringshantering
	If Len(trim(Request.Querystring("n"))) > 0 Then intPage = cInt(trim(Request.Querystring("n"))) Else intPage = 1
	intFirstPost = (intPage - 1) * intPostsPerPage
	intTotalPosts = UBound(arrRecSet, 2)
	intPages = ((intTotalPosts)\intPostsPerPage)+1

	If intFirstPost + (intPostsPerPage - 1) >= UBound(arrRecSet,2) Then
		intLastPost = UBound(arrRecSet, 2) 
	Else
		intLastPost = intFirstPost + (intPostsPerPage - 1)
		strNext = True
	End If

	'// Skriv ut posterna
	For i = intFirstPost To intLastPost
          TradID = arrRecSet(0,i)
          strRubrik = arrRecSet(1,i)
          strepost = arrRecSet(2,i)
          strusername = arrRecSet(3,i)
          strdatum = arrRecSet(4,i)
          Set Count = ObjConn.Execute("Select count(*) from forum where svar='Ja'" & " and tradID='"&SafeSQL(TradID)&"'")
          antal = Count(0)
          count.close : set Count = nothing
          response.write "<table class='tbl' width='586'>"
          response.write "<tr><td><table class='tbl2' width='580' cellspacing='0' cellpadding='0'>"
          response.write "<tr><td colspan='3'><a href='main.asp?page=87'>Kategori</a> » " & Server.Htmlencode(Request.Querystring("kat")) & "</td></tr>"
          response.write "<tr>"
          response.write "	<td width='30' height='21'>"
          response.write "	&nbsp;</td><td width='449'>&nbsp;</td><td align='left' width='100'>"
          response.write "	<b><a href='main.asp?page=92'><font color='#000000'>Skapa ny tråd</font></a></b></td>"
          response.write "</tr>"
          response.write "<tr>"
          response.write "	<td width='30' height='21'>"
          response.write "	&nbsp;</td><td width='449'><b>Trådar:</b></td><td align='left' width='100'>"
          response.write "	<b>Antal svar:</b></td>"
          response.write "</tr>"
          response.write "<tr class='" & color & "'><td width='30' height='40'>"
          response.write "	<p align='center'><img src='bilder/forum.png' alt=''></td>"
          response.write " <td width='449'><b><a href='main.asp?page=93&tradid=" & Server.HtmlEncode(TradID) & "'>" & Server.HtmlEncode(strRubrik) & "</a></b>skapades av <a href='" & Server.HtmlEncode(strepost) & "'>" & Server.HtmlEncode(strusername) & "</a><br>&nbsp;" & strDatum & "</td>"
          response.write "	<td align='left' width='100'><br>" & antal & " st</td></tr></table></table>"
	Next

	'// Navigering, välj själv knappar eller text
	Call buttonNavigate(intPage, intTotalPosts, intPostsPerPage, intPages)
	'Call textNavigate(intPage, intTotalPosts, intPostsPerPage, intPages)

'// Fanns inga poster
Else
	Response.Write "Här var det tomt.. fyll på i databasen bums. =)"
End If
%>
```

Microsoft VBScript compilation error '800a03fb' 

Expected 'Loop' 

/cat_open.asp, line 90

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

## #35 — voigtann1, 2006-11-28T12:57Z

får man fråga hur \<!--#include file="includes/color.asp" --\> ser ut?

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

## #36 — Jeppeweb, 2006-11-28T12:59Z

```
<%

// Olika färger på olika rader, fägerna ändrar du i CSS-filen.
Color = "rad1"
Do until RS.Eof
If color = "rad1" then
	Color = "rad2"
Else
	Color = "rad1"
End if

%>
```

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

## #37 — voigtann1, 2006-11-28T13:02Z

där är felet....

```
<%
function color
if i = 0 then
Color = "rad1"
i = 1
else
Color = "rad2"
i = 0
end if
%>
```

Då du inte har något "RS" i huvudtaget längre..

för övrigt så måste du läsa hur man kodar... det du gör just nu (som jag har sett) gör du det MYCKET svårare än vad den behöver vara..

har en känsla att du har mycket skräp i dina koder..
och att du får kolla igneom \<!--#include file="databaskopplingar.asp"--\>
\<!--#include file="includes/db.asp" --\> också

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

## #38 — Jeppeweb, 2006-11-28T13:10Z

Microsoft VBScript compilation error '800a03f7' 

Expected 'Function' 

/cat_open.asp, line 91 

End
\---^
 
Den klagar på att det fattas en "end if" i slutet.. slänger in end if och får detta felmeddelande..

tacksam för hjjälp

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

## #39 — voigtann1, 2006-11-28T13:11Z

end function... ibland måste man tänka lite själv Jeppeweb..

```
<%
function color
if i = 0 then
Color = "rad1"
i = 1
else
Color = "rad2"
i = 0
end if
end function
%>
```

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

## #40 — Jeppeweb, 2006-11-28T13:15Z

:) ja..

tack så hemskt mkt för all din tid.. tack tack!

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/154281-hjälp-paging/page2  
Föregående sida: https://www.webforum.nu/amne/asp/154281-hjälp-paging.md  
Nästa sida: https://www.webforum.nu/amne/asp/154281-hjälp-paging/page3.md