SQL streng

Du kan oprette et recordset og bruge movenext og moveprev

Jeg går ud fra at du i det mindste har sorteret efter ID, selv om de ikke er fortløbende...

Så kan du vel lave en
SELECT TOP 1 * NYHEDER WHERE ID < '" & Request("ID") & "'
og
SELECT TOP 1 * NYHEDER WHERE ID < '" & Request("ID") & "'
inde på hhv. den forrige og den næste...

(Jeg er ikke lige 100% sikker på syntaxen for min SQL... :-)

Ups. anden linie skulle naturligvis være modificeret til

SELECT TOP 1 * NYHEDER WHERE ID > '" & Request("ID") & "'

*SUK* Jeg er ikke vågen idag.

Glem lige de to forrige....

SELECT TOP 1 * NYHEDER WHERE ID < '" & Request("ID") & "' ORDER BY ID DESC
og
SELECT TOP 1 * NYHEDER WHERE ID < '" & Request("ID") & "' ORDER BY ID ASC

LOL! Det går godt.

select top 1 * FROM nyheder .... osv

Jeg tror bare jeg går hjem i seng. Godnat. :-)

mundi>> Det var for undgå at skulle køre et helt recordset igennem. Der må være en mulighed for at lave noget der er bedre rent performancemæssigt.

sbm>> Som jeg skrev, så er ID ikke et fortløbende nummer, men en GUID (En unik steng sammensat af tilfældige tal og bogstaver)

Jamen du må da sortere efter et eller andet? Hvis det ikke er tilfældet, har du ikke andre muligheder end at arbejde på hele recordsettet.

Sorterer du efter et dato-felt eller lign? Så skal ORDER BY bare gå på dit datofelt istedet.

Næ.... Du er nødt til at tage den række hvor ID er lig med din ID parameter... Hmmm.... Nej, jeg tror ikke du kan få det gjort uden at hive flere rækker ind samtidig, og så bladre et trin frem eller tilbage.

Jeg har tilføjet et timestamp på mine nyheder. Og har derefter ladet mig inspirere af sbm.
Resultatet får I når jeg er færdig og det er testet.

Som jeg forstår det vil du lave det i ét recordset.

Måske dette kunne være en løsning:

midtId = request.querystring("id")
prevId = midtId - 1
nextId = midtId + 1

sql = "SELECT * FROM Nyheder WHERE Id="&midtId&" OR ID="&prevId&" OR Id="&nextId
Set rs = Conn.Execute(sql)

Vil lige gøre opmærksom på at det IKKE er testet!

Hmmm - glem det....kan se det tåbelige i det nu. ;0)

Jeg har tilføjet et tidspunkt på mine nyheder. Ikke som jeg skrev - et timestamp, og har kan derved få rækkefølgen korrekt.

SQL = "SELECT Top 1 ID FROM vw_NyhedsOversigt WHERE Expired = 0 AND Tidsstempel < '" & strTidsstempel & "' ORDER BY StartDato DESC, Tidsstempel DESC"
rs1.Open SQL, conn, 3, 3
  If NOT rs1.EOF Then
    Response.Write "<A HREF=""Nyheder_View.asp?ID=" & rs1("ID") & """ CLASS=""Link"">" & Application("T" & Session("Lang1") & "_379") & "</A>&nbsp;&nbsp;&nbsp;"
  End If
rs1.Close
SQL = "SELECT Top 1 ID FROM vw_NyhedsOversigt WHERE Expired = 0 AND Tidsstempel > '" & strTidsstempel & "' ORDER BY StartDato ASC, Tidsstempel ASC"
rs1.Open SQL, conn, 3, 3
  If NOT rs1.EOF Then
    Response.Write "<A HREF=""Nyheder_View.asp?ID=" & rs1("ID") & """ CLASS=""Link"">" & Application("T" & Session("Lang1") & "_32") & "</A>&nbsp;&nbsp;&nbsp;"
  End If
rs1.Close