---
title: "Loop, next.......dummerjöns på asp"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/9490-loop-next-dummerjöns-på-asp"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "d@nneb"
published: "2001-05-15T08:36:00.000Z"
updated: "2001-05-15T09:35:00.000Z"
replies: 6
views: 151
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/9490-loop-next-dummerjöns-på-asp"
---

# Loop, next.......dummerjöns på asp

## #1 — d@nneb, 2001-05-15T08:36Z

Hallo...skratta inte åt mitt enkla problem. Hur får jag så att jag kan visa flera istället för bara den senaste uppdateringen? Förbättra gärna koden..

\<%
Set Databas = Server.CreateObject("ADODB.Connection")
MdbFilePath="C:\\inetpub\\wwwroot\\upp\\uppdaterat.mdb"
Databas.Open "Driver={Microsoft Access Driver (\*.mdb)}; DBQ= " & MdbFilePath & ";"
Set rsUpp = Databas.execute("SELECT TOP 5 \* FROM uppdaterat ORDER BY id DESC")

If rsUpp.EOF then
%\>
Inga uppdateringar än!
%\>
\<% End If %\>

Datum:\<br\>
\<%=rsUpp("datum")%\> &#0124; \<a href="\<%=rsUpp("url")%\>"\>\<%=rsUpp("rubrik")%\>\</a\>

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

## #2 — McD, 2001-05-15T08:47Z

Humm har du klippt kod från något annat... ? select top 5 \* from ?!?!?

Select \* from uppdaterat where (datum) blabla någonting... 

O sen response.write ut det du får iof blir det alla...

Select top 5 from uppdaterat where (datum) blabla någonting... 

skall generera de senaste 5 uppdateringarna

Ropar på @nders....( dillar jag?)

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

## #3 — erka, 2001-05-15T08:50Z

DU får göra typ så här

```
<% Do Until RSUpp.Eof %>

<%=rsUpp("datum")%> &#0124; <a href="<%=rsUpp("url")%>"><%=rsUpp("rubrik")%></a>
<% 
RsUpp.MoveNext
Loop
RsUpp.Close
%>
```

Men om du ska få ut alla så kan tu inte ta ut top 5 för det tar som sagt ut de fem senaste

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

## #4 — d@nneb, 2001-05-15T09:13Z

Jag bugar & bockar. Lade till en radbrytning & scriptet är klart....

:)-\<-\>

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

## #5 — McD, 2001-05-15T09:15Z

Wiiiiiii....

Hur blev den färdiga koden ....

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

## #6 — d@nneb, 2001-05-15T09:26Z

```
<%
Set Databas = Server.CreateObject("ADODB.Connection")
MdbFilePath="C:\inetpub\wwwroot\upp\uppdaterat.mdb"
Databas.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ= " & MdbFilePath & ";"
Set rsUpp = Databas.execute("SELECT TOP 5 * FROM uppdaterat ORDER BY id DESC")

If rsUpp.EOF then
%>
Inga uppdateringar än!

<% End If %>

<% Do Until RSUpp.Eof %>
<%=rsUpp("datum")%> &#0124; <a href="<%=rsUpp("url")%>"><%=rsUpp("rubrik")%></a>
<br>
<% 
RsUpp.MoveNext
Loop
RsUpp.Close
%>
```

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

## #7 — McD, 2001-05-15T09:35Z

Nice...

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/9490-loop-next-dummerjöns-på-asp