Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Paging kod som d e nåt fel på!! [LÖST]

Postades av 2002-07-28 19:31:57 - Jonnie De Paul, i forum asp - allmänt, Tråden har 2 Kommentarer och lästs av 422 personer

Hej å hå!!
D e nåt fel på denna koden men jag vet inte vad..
När jag har en "rad" i databasen som jag ska skriva ut på sidan så listar den alldeles utmärkt.. men om jag sedan lägger till en "rad" till som ska skrivas ut så listar den ut den första raden så att den första sidan blir full.. *Skumt*

Här e koden så att ni kan kolla.

<%
Page = Request.QueryString("Page")

If Page = "" then Page = 1
RowCount = 0

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("../_database/data.mdb") & ";"

Set RecSet = Server.CreateObject("ADODB.Recordset")
RecSet.Open "SELECT * From Annonser WHERE Kategori='" & Request.QueryString("Kategori") &"'", Connect, 1, 3

RecSet.PageSize = 31

RecSet.AbsolutePage = cInt(Page)
%>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="618">
<tr>
<td width="584" class="rubrik">Annons rubrik</td>
<td width="249" class="rubrik">Köpare</td>
<td width="294" class="rubrik">Län</td>
</tr>
<%
DO While Not RecSet.EOF and RowCount < RecSet.PageSize

RecSet.AbsolutePage = Page
totalPages = RecSet.PageCount

annonser = annonser + 1
If annonser Mod 2 = 0 Then
color = "#D9ECFF"
Else
color = "#CEE7FF"
End If
%>
<tr bgcolor="<%=color%>">
<td width="584" class="text">"><%=RecSet("Rubrik")%></td>
<td width="249" class="text"><%=RecSet("Namn")%></td>
<td width="294" class="text"><%=RecSet("Län")%></td>
</tr>
<%
RecSet.MoveNext
RowCount = RowCount + 1
Loop
%>
<tr>
<td width="1127" colspan="3" class="text"> </td>
</tr>
<tr>
<td width="1127" colspan="3" class="text">
<div align="center"> 
<% If RowCount < 31 Then %>

<%
Else
Response.Write "<-- Första sidan"
%>
[ <%
For PageCounter = 1 to RecSet.PageCount
Response.Write "" & PageCounter & "&nbsp;"
Next
%>]
<%
Response.Write " Sista sidan -->"
End If
%>
</div>
</td>
</tr>
<%
RecSet.Close
Connect.Close
%>

MVH
//Jonnie


Svara

Sv: Paging kod som d e nåt fel på!!

Postades av 2002-07-28 20:06:23 - Pelle Johansson

Titta på asp artikeln paging så kan du se vad som behövs.

Hälsningar
/Pelle


Svara

Sv: Paging kod som d e nåt fel på!!

Postades av 2002-07-29 19:49:53 - Jonnie De Paul

Tack så mycket Pelle!!
med hjälp av den koden så såga jag vad d va för fel..
Jag hade bara satt två små kod rader fel...

MVH
//Jonnie


Svara

Nyligen

  • 08:28 Butiksskyltar: Hur upplever utbude
  • 22:31 Slappna av
  • 19:55 kick-off med fokus på hälsa?
  • 19:53 kick-off med fokus på hälsa?
  • 16:24 Föreslå en skönhetsklinik online
  • 16:23 Föreslå en skönhetsklinik online
  • 18:42 Hvor finder man håndlavede lamper
  • 18:41 Hvor finder man håndlavede lamper

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 570 830
27 960
271 761
3 029
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies