---
title: "Paging"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/69875-paging"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "dahlgren"
published: "2003-03-03T10:42:42.000Z"
updated: "2003-03-03T11:10:46.000Z"
replies: 5
views: 220
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/69875-paging"
---

# Paging

## #1 — dahlgren, 2003-03-03T10:42Z

Jag har läst paging artikel av Patrik B här och föröker få det att funka men jag får felmedelande. Vad är det som är fel? Jag använder mig av Mysql. 

ADODB.Recordset error '800a0cb3' 

Object or provider is not capable of performing requested operation. 

/dweb/fotoalbum/bild.asp, line 75 

Detta är rad 75: objRS.AbsolutePage = intPage

```
<% 
dim namn 
namn=request.querystring("namn") 

'## -- hur många poster ska visas per sida -- 
intPageSize = 1 '## -- byt ut till hur många poster du vill ska visas per sida -- 

'## -- vilken sida ska visas -- 
intPage = Request.QueryString("page") 

'## -- kontrollera så att inte intPage variabeln är tom -- 
If intPage = "" Then intPage = 1 '## -- visa första sidan som default -- 

'## -- sql-fråga för att hämta data från databasen -- 
strSQL = "SELECT * FROM album where namn='"& namn & "'order by id" 

'## -- skapa och öppna recordsetet -- 
Set objRS = Server.CreateObject("ADODB.Recordset") 
   With objRS 
       .ActiveConnection = Conn 
       .Source = strSQL 

       '## -- bestämmer hur många poster som varje sida ska bestå av i recordsetet -- 
       .PageSize = intPageSize 
       .CursorType = 3 
       .LockType = 1 
       .Open 
   End With 

   '## -- kontrollera om några poster har returnerats eller inte -- 
   If Not objRS.EOF Then 
       '## -- poster har returnerats -- 

       '## -- visa rätt sida i recordsetet -- 
       objRS.AbsolutePage = intPage 

       '## -- hur många sidor består recordsetet av -- 
       intTotalPages = objRS.PageCount 

       '## -- visa sidnavigeringen -- 
       Call PageNavigation(intPage, intTotalPages) 

       '## -- loopa igenom recordsetet och visa posterna för besökaren/användaren -- 
       Do Until objRS.EOF OR intCounter >= intPageSize 
           intCounter = intCounter + 1 

           '## -- printa ut informationen till besökare/användaren -- 
       responsee.write "<img src='http://www.mindoman.com"& objRS("bild")& "'>" 
           objRS.MoveNext 
       Loop 
   Else 
       '## -- inga poster returnerades -- 
       '## -- visa meddelande att inga poster hittades för användaren -- 
   End If 

   '## -- rensa up -- 
   objRS.Close 
Set objRS = Nothing 

   Conn.Close 
Set conn = Nothing 

       '## -- visa sidnavigeringen -- 
       Call PageNavigation(intPage, intTotalPages) 

'## -- include filen nedan innehåller själva subrutinen för sidnavigeringen -- 
%>
```

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

## #2 — m_soderlund, 2003-03-03T10:49Z

Skumt. Har du rätt databasanslutning?

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

## #3 — dahlgren, 2003-03-03T10:56Z

Japp använder samma till alla sidor. så här ser den ut:

```
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Set Databas = Server.CreateObject("ADODB.Recordset")

Conn.Open "driver=MySQL;server=******;uid=****;pwd=****;database=best_nu"

%>
```

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

## #4 — @nders, 2003-03-03T11:01Z

Du har givetvis sökt på *paging AND mysql* för att läsa om andra som haft samma problem?

Jag hittade exempelvis [detta](http://www.webforum.nu/showthread.php?s=&postid=78075#post78075).

mvh

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

## #5 — dahlgren, 2003-03-03T11:08Z

Nej det hade jag natruligtvis glömt.  :r  Tack @nders. Nu kommer det  massa ny felmdelanden men de ska jag ing klara av lösa,.

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

## #6 — m_soderlund, 2003-03-03T11:10Z

Bra @nders. Så löste det sig också.. :D

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

---

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