Søg
Avatar billede larsen45 Juniormester
10. november 2003 - 16:23 Der er 4 kommentarer og
1 løsning

paging 10 visninger pr. side

Hvordan for jeg denne kode til vise sideskift og 10 nyheder
pr. side.

<html>
<head>
</head>
<body bgcolor="#ffffff">
<%
set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("dbdata.mdb")
strsql = "SELECT TOP 5 * FROM nyheder ORDER BY ID DESC"
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strsql, conn
rs.MoveFirst
x=0
Do While (NOT rs.EOF)
x=x+1
x_id = rs("id")
x_overskrift = rs("overskrift")
x_hits = rs("hits")
Response.Write("" & x & ". <a href='visnyhed.asp?id=" & x_id & "'>" & Left(x_overskrift, 20) & "</a><br>")
rs.MoveNext
Loop
rs.Close
Set rs = Nothing
%>
</body>
</html>

Håber der er en som kan hjælpe mig.
Avatar billede cdc Novice
10. november 2003 - 16:25 #1
ved ikke om dette hjælper dig lidt på vej: http://www.eksperten.dk/spm/410714 har haft samme problem
Avatar billede larsen45 Juniormester
10. november 2003 - 16:30 #2
Det bliver nok svært.
Jeg må nok bede om at en person laver en paging med denne kode som står
her da det er den jeg skal bruge.
Avatar billede m_skau Nybegynder
10. november 2003 - 16:46 #3
Noget i denne her retning:

dennesidesnavn.asp:

<html>
<head>
</head>
<body bgcolor="#ffffff">
<%
set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("dbdata.mdb")
if request.querystring("lastid") <> "" then
    strsql = "SELECT TOP 10 * FROM nyheder (WHERE ID < " & lastid & ") ORDER BY ID DESC"
else
    strsql = "SELECT TOP 10 * FROM nyheder ORDER BY ID DESC"
end if
set rs = Server.CreateObject("ADODB.Recordset")

set rsmin = Server.CreateObject("ADODB.Recordset")
rsmin.open "SELECT MIN(id) AS mindsteid from ORDER"
mindsteid = rsmin("mindsteid")
rsmin.close

rs.Open strsql, conn
rs.MoveFirst
x=0
Do While (NOT rs.EOF)
  x=x+1
  x_id = rs("id")
  x_overskrift = rs("overskrift")
  x_hits = rs("hits")
  Response.Write("" & x & ". <a href='visnyhed.asp?id=" & x_id & "'>" & Left(x_overskrift, 20) & "</a><br>")
  rs.MoveNext
Loop
lastid = rs("ID")
rs.Close
conn.close
Set rs = Nothing
if lastid <> "" then
    response.write("<A href='java script:history.back();'>Forrige 10</a> &nbsp;&nbsp;&nbsp;&nbsp;")
end if
if lastid < mindsteid then
    response.write("<a href='dennesidesnavn.asp?lastid=" & lastid & "> Næste 10 </a>")
end if
%>
</body>
</html>
Avatar billede larsen45 Juniormester
10. november 2003 - 23:48 #4
jeg har lige prøvet den m_skau.
Den vil ikke virke på serveren??
Hvad er der mon galt.
Den siger at: siden ikke kan vises.

Venlig hilsen

Søren Borck Larsen
E-mail: dsl52640@vip.cybercity.dk
ICQ: 259566168
Skype: larsen45
Avatar billede larsen45 Juniormester
11. november 2003 - 15:48 #5
søger stadig hjælppppppppppppppppppppppp
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Se alle it-kurser fra Computerworld Kurser
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.
Se alle it-kurser

Flere spørgsmål fra Småopgaver kategorien

Titel Indlæg Oprettet Seneste aktivitet
Negativ billeder på samsung Af ALICE i Småopgaver 2 16/01/202610:29 16/01/202618:31
Flytte mappe fra stationær til bærbar Af valby i Småopgaver 20 07/05/202520:51 10/05/202513:43
Hjælp til DC motorstyring Af axel21 i Småopgaver 7 06/03/202522:34 10/03/202518:51
Gode råd til kommende supporter Af SilentSloth i Småopgaver 4 31/12/202423:10 01/01/202515:09
Udregning af vinkel på brædder. Af Peter i Småopgaver 14 11/12/202415:12 13/12/202415:40
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 09:37 hvilken AI synes I er bedst? Af jcr18 i Andre onlineløsninger
22/0518:51 Pausepil på youtube i chrome Af valby i Browsere
22/0511:42 Mail med endelsen ".lat" Af ErikHg i E-mail
21/0511:48 Nyåbnede sider flimrer på Android tablet, hvorfor Af annam i Andet software
21/0511:03 Bitlocker fordele-ulemper, samt nulstille PC Af Uvanga i Windows
White papers
Flere white papers »