paging : vis antallet af rækker

Det er nok noget nemmere hvis du viser os din kode...

-Anders

hvis du har en variable med hvilken side du er på:
intPage = 3 'Angiver hvilekn side man er på antager den føste side er intPage=1
Og en for hvor mange der skal vises pr side.:
pageSize = 10 'Antal pr side.

minNo = (intPage*pageSize) - pageSize + 1
maxNo = intPage*pageSize

Så kan du udskrive det.

Response.write "Du ser fra " & minNo & " - "  maxNo

eagleeye > kun en lille fejl i din ellers fungerende kode: hvis listen kun indholde fx 6 men pagesize er 10, vil der stå 1-10 :)

og den er rettet nu :)

takker for hjælpen

hvordan rettede du det så ? Det kunne være at der var andre der kunne bruge det til noget.

det skriver jeg når jeg er knap så træt :)

det er okay, jeg har bare prøvet at finde ud af hvordan man gjorde og nu var chances der :D

hey psyclown!

Nu har jeg fået mig lidt søvn, så jeg er i stand til at hjælpe dig lidt på vej :)


Jeg går udfra at du bruger det rimlig almindlige paging script, som man kan finde på http://activedeveloper.dk/aspdigital/kapitel2/paging.asp

Som jeg har gjort det, smider man en variabel der tæller antallet af viste rækker, ind i løkken, samt smider antal er total rækker i en variabel:

rows = rs.recordcount 'alle rækker

rs.PageSize = 20
rs.AbsolutePage = intPage
intRecCount1 = rs.PageSize
intPageCount1 = rs.PageCount
counter = 0 'tælle variabel

Do While Not rs.EOF And intRecCount > 0
counter = counter + 1 'lig en til variablen
'indsæt rækkerne her
rs.MoveNext
loop

'så bruger vi eagleeye's script:
pageSize = rs.pagesize
minNo = (intPage*pageSize) - pageSize + 1
maxNo = intPage*pageSize


og når vi skal indsætte det skal vi lige tjekke nogle ting først, det er altså ikke nok bare med Response.write "Du ser fra " & minNo & " - "  maxNo, da det vil give et "upræcist" resultat. Derfor:


        <%
          if intPageCount <> "" then 'hvis der er nogen sider

          Response.Write minNo & " - "
         
          if Clng(intPage) > 1 Then 'hvis den aktuelle side er større end 1
            Response.Write (maxNo) - (pageSize-counter) 'simpel matematik :)
          elseif Clng(intPage) = 0 AND Clng(intPageCount) = 1 then 'hvis der er 1 side, og altså ikke nogen grund til paging
            Response.Write maxNo
          else 'i andre tilfælde bruger vi vores variabel
            Response.Write counter
          end if
          Response.Write " af " & rows
         
          end if
        %>

intRecCount1 = rs.PageSize
intPageCount1 = rs.PageCount

skal være

intRecCount = rs.PageSize
intPageCount = rs.PageCount