Turvenn.no
Webutvikler kurs ASP.NET, C#, CSS mm.

WebRessurs.no - Webprogrammering og ressurs innen ASP, ASP.NET, PHP, SQL, HTML, CSS, Javascript, XML, C#, VB, Flash  mm.

Brukernavn: 
Passord:

Registrèr deg Glemt passord?
Logg deg inn




  ASP.net (199)
  ASP 3.0 (111)
  PHP (30)
  HTML (66)
  SQL (89)
  CSS (46)
  XML (7)
  JavaScript (78)
  Diverse kode (13)


  Programmering (22)
  System og drift (15)
  Trafikk og inntekt (11)
  Guider og tips (22)
  Nyttig lesestoff (23)
  Web forum (604)
  Link galleri (565)


  ASP.NET kurs(5)
  CSS kurs (2)
  JQuery kurs (2)


  Øk trafikken (8)
  Facebook App. (4)
  Microsoft CEO (6)


  Server & web
  Internett & epost
  Systemverktøy
  Sikkerhet
  Fildeling
  Lyd & media
  Diverse software


  Domenesalg
  Metagenerator
  Websikre farger
  WebMail


  Bli medlem!
  Siste innlegg
  Gjestebok
  Tips en venn
  Kontakt oss
  Forsiden




Kode Artikler
Linker


Mål internetthastigheten din.


Paging (dele opp databasespørring)

av Øyvind A. Isaksen
 
Paging bruker der du kun ønsker å vise en del av dataene på en side, og bla videre for å se neste del av dataene. Brukes til [<<forrige][neste>>] - linker.

<%
SQL = "SELECT * FROM tblSladder"
ConnString = "Provider=SQLOLEDB; Data Source=localhost; Database=xxx; UID=xxx; PWD=xxx;"
----------------------------------------------
Sidenr = Request.QueryString("side")
If Sidenr = "" then Sidenr = 1
----------------------------------------------

Set rs = server.CreateObject("ADODB.Recordset")

rs.Open SQL, ConnString, 1

rs.PageSize = 10 (Hvor mange treff pr. side)
rs.AbsolutePage = Sidenr (Hvilken av sidene vi skal ha ut)

AktivSide = rs.PageSize (Hvor mange records det er på denne siden)
AntSider = rs.PageCount (Hvor mange sider det er totalt)
Response.Write "<b>Side " & Sidenr & " av " & AntSider & "</b><hr>"

Do While Not rs.EOF And AktivSide > 0
Response.Write rs("overskrift") & "<br>"
AktivSide = AktivSide - 1
rs.MoveNext
Loop

rs.Close

Set rs = nothing
%>

<%
if not (sidenr = 1) then
Response.Write("<a href=""?side=" &Sidenr - 1&""">forrige</a> | ")
end if

if not (clng(sidenr)) = (Clng(AntSider)) then (CLNG konverterer variablene til Variant)
Response.Write("<a href=""?side=" &Sidenr + 1&""">neste</a>")
end if
%>

WebRessurs.no anbefaler:    StackOverflow.com | Experts-Exchange.com | W3schools | ASP.NET | Codeproject | 4Guys
WebRessurs.no er utviklet og drives av SoftMaker
Sett som startside: [ ]. Bokmerk denne siden: [ klikk ]. Sitemap. http://twitter.com/webressurs_no/. Antall brukersesjoner: 14112513.
Copyright WebRessurs.no © 2003 - 2018
Jobbsøk.no - Jobbsøknad, CV, intervju, tips og lenker