---
title: "Visa ej det senaste"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/10880-visa-ej-det-senaste"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Bj"
published: "2001-08-01T15:49:00.000Z"
updated: "2001-08-02T08:16:00.000Z"
replies: 8
views: 260
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/10880-visa-ej-det-senaste"
---

# Visa ej det senaste

## #1 — Bj, 2001-08-01T15:49Z

Om man av ngn anledning inte vill visa det senast inlagda i en databas men allt annat.
Hur gör man då?

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

## #2 — emission, 2001-08-01T15:57Z

t.ex. 

SELECT \* FROM tabell where kolumnid NOT IN (SELECT TOP 1 kolumnid FROM tabell ORDER BY kolumnid DESC)

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

## #3 — Axelsson, 2001-08-01T21:42Z

Eller...

Sätt in:
RecSet.Movenext
före du börjar loopen eller vad du nu använder för att skriva ut innehållet

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

## #4 — Bj, 2001-08-02T07:05Z

Får det inte riktigt att funka.

```
	<%
	Set Connect2 = Server.CreateObject("ADODB.Connection")
	Connect2.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("databas.mdb"))

	Dim antal
	antal = 0

	Set RecSet2 = Server.CreateObject("ADODB.Recordset")
	Visa = "SELECT * FROM nyheter ORDER BY Id DESC"
	RecSet2.Open Visa, Connect2, adOpenStatic, adLockOptimistic
	Do Until RecSet2.EOF 
	%>

	<%=RecSet2("rubrik")%>

 	<%
	antal = antal + 1	
	RecSet2.MoveNext
	Loop
	RecSet2.Close
	Connect2.Close
	Set Connect2 = Nothing
	%>
```

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

## #5 — kristoffer, 2001-08-02T07:20Z

Men du har ju inte lagt in Emissions kod.

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

## #6 — Bj, 2001-08-02T07:58Z

Äh jag förklarar mig så dåligt, klippte in den gamla koden.
Det som händer är att trots att det är valt DESC så visar den sidan som ASC. Om man skriver ASC eller inget alls så visar den det senast inlagda.

```
<%
Set Connect2 = Server.CreateObject("ADODB.Connection")
Connect2.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("databas.mdb"))
Dim antal
antal = 0

Set RecSet2 = Server.CreateObject("ADODB.Recordset")
Visa = "SELECT * FROM nyheter where Id NOT IN (SELECT TOP 1 Id FROM nyheter ORDER BY Id DESC)"
RecSet2.Open Visa, Connect2, adOpenStatic, adLockOptimistic
Do Until RecSet2.EOF 
%>

<%=RecSet2("rubrik")%><br>

<%
antal = antal + 1 
RecSet2.MoveNext
Loop
RecSet2.Close
Connect2.Close
Set Connect2 = Nothing
%>
```

\[Redigerat av Bj den 02 aug 2001\]

\[Redigerat av Bj den 02 aug 2001\]

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

## #7 — LarsG, 2001-08-02T08:10Z

```
Visa = "SELECT * FROM nyheter where Id NOT IN (SELECT TOP 1 Id FROM nyheter ORDER BY Id DESC) order by id desc"
```

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

## #8 — emission, 2001-08-02T08:12Z

Det är för att ingen sortering görs.

Visa = "SELECT \* FROM nyheter where Id NOT IN (SELECT TOP 1 Id FROM nyheter ORDER BY Id DESC) ORDER BY Id DESC"

\[r\]Funderar på att lägga in en 3-minuters fördröjning på LarsG:s inlägg ;) \[/r\]

\[Redigerat av emission den 02 aug 2001\]

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

## #9 — Bj, 2001-08-02T08:16Z

Tackar alla!

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/10880-visa-ej-det-senaste