---
title: "jobbigt paging fel :("
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/38838-jobbigt-paging-fel"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Cactuz"
published: "2002-03-02T15:54:46.000Z"
updated: "2002-03-02T16:25:43.000Z"
replies: 2
views: 207
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/38838-jobbigt-paging-fel"
---

# jobbigt paging fel :(

## #1 — Cactuz, 2002-03-02T15:54Z

KOD:

\<%
Set objRs = Server.Createobject("Adodb.Recordset")
strSQL = "Select \* from anvandare Order by id asc"

strConString = "Provider=Microsoft.Jet.OLEDB.4.0;Data source=" &\_
  Server.MapPath("/") & "/data/db.mdb"

intPageId = request.querystring( "pageid" )
if intPageId = "" then intPageId = 1

with objRs
  .cursorlocation = 3 'adUseClient
  .open strSQL, strConString 'öppnar databasen och hämtar info.
  .pagesize = 50 'bestämmer hur många poster per sida.
  .absolutepage = intPageId 'bestämmer vilken sida som skall visas.
end with

intPages = cint( objRs.pagecount ) 'Kollar hur många sidor som finns i recordsettet.
intCurrentPost = 0 'Nollställer räknaren som skall hålla kolla på vilken post vi är på.

do while not objRs.eof and intCurrentPost \< objRs.pagesize
  **strContents = strContents &\_**
    "\<tr\>\<td\>\<font  face='Verdana' size='1'\>" & objRs( "Namn" ) & "\</td\>" &\_
    "\<td\>\<font  face='Verdana' size='1'\>" & objRs( "kon" ) & "" & objRs( "Alder" ) & "\</td\>\</tr\>"
  intCurrentPost = intCurrentPost + 1
  objRs.MoveNext
loop

function getFirstLink()
  getFirstLink = " \<a href='?id=com/users&pageid=1'\>Första sidan\</a\> "
end function

function getPreviousLink( intPageId )
  if intPageId \> 1 then
    getPreviousLink = " \<a href='?id=com/users&pageid=" & intPageId - 1 & "'\>&lt;&lt;\</a\> "
  end if
end function

for i = 1 to objRs.pagecount
  strNavigation = strNavigation & " \<a href='?id=com/users&pageid=" & i & "'\>" & i & "\</a\>"
next

function getNextLink( intPageId, intPageCount )
  if cint( intPageId ) \< cint( intPageCount ) then
    getNextLink = " \<a href='?id=com/users&pageid=" & intPageId + 1 & "'\>&gt;&gt;\</a\> "
  end if
end function

function getLastLink( intPageCount )
  getLastLink = " \<a href='?id=com/users&pageid=" & intPageCount & "'\>Sista sidan\</a\> "
end function

function getPageInfo( intPageId, intPageCount )
  getPageInfo = " Antal sidor: " & intPageCount & ", nuvarande sida: " & intPageId & " "
end function
%\>

\<b\>\<%=response.write("" & getPageInfo(intPageId, intPages) & "") %\>\</b\>
\<br\>
\<table cellpadding="7" width="100%"\>
   \<tr\>
	\<td\>

\<%
response.write "\<table\>" & strContents & "\</table\>"

response.write ("\<br\>\<table\>\<tr\>\<td\>\<font  face='Verdana' size='1'\>\<b\>" & getFirstLink() & "\</b\>&#160;&#160;" & getPreviousLink(intPageId) & "")

response.write ("" & strNavigation & "")

response.write ("" & getNextLink(intPageId, intPages) & "&#160;&#160;\<b\>" & getLastLink(intPages) & "\</b\>\</td\>\</tr\>\</table\>") 
%\>

\</font\>
\</td\>
\</tr\>
\</table\>
\</td\>
\</tr\>
\</table\>

Får felmeddelandet:

Feltyp:
ADODB.Recordset (0x800A0CC1)
Objektet kunde inte hittas i mängden med det begärda namnet eller numret.

Raden det står att det är fel på är:
  strContents = strContents &\_

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

## #2 — cyprys, 2002-03-02T16:18Z

Kontrollerat att du verkligen har rätt namn på alla kolumnnamn?

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

## #3 — Cactuz, 2002-03-02T16:25Z

har hittat felet nu... problemet är att jag skriver ut åldern med

```
dag = rs("Alder_dag")
manad = rs("Alder_manad")
ar = rs("Alder_ar")

if not isnull(ar) and not isnull(manad) and not isnull(dag) then
response.write DiffADate(DateSerial(ar,manad,dag))
else
response.write " "
end if
```

hur får jag in d i scriptet?

EDIT: det ska stå där " & Alder & " står.. det va felet.. alder fanns inte längre :)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/38838-jobbigt-paging-fel