--- title: "Visa senaste nyhet först" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/11815-visa-senaste-nyhet-först" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "Hulth" published: "2001-09-27T18:41:00.000Z" updated: "2001-09-27T18:46:00.000Z" replies: 5 views: 282 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/11815-visa-senaste-nyhet-först" --- # Visa senaste nyhet först ## #1 — Hulth, 2001-09-27T18:41Z Hej. HIt brukar jag vända mig när jag stöter på problem så nu var det dags igen. Efter att ha utvecklat ett perfekt nyhets-script i asp så har jag nu gjort en sida som visar alla nyheter och en enskild nyhet. Nu vill jag att den ska visa den senaste nyheten först och det gör den inte. den visar den senaste sist. Hur gör jag? ``` Läs gamla nyheter <% If Request.Querystring("visa") = "" Then Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("nyheter.mdb")&";" Set RecSet = Server.CreateObject("ADODB.Recordset") Addera = "SELECT * FROM nyheter " RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic Do Until RecSet.EOF %>
<%=RecSet("rubrik")%> - <%=FormatDateTime(RecSet("datum"),vbLongdate)%> av <%=RecSet("person")%>
<%=Replace(RecSet("text"),vbCrLf,"
")%>


<% RecSet.MoveNext Loop RecSet.Close Connect.Close Set RecSet = nothing Set Connect = nothing End If If Request.Querystring("visa") = "sep" Then Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("nyheter.mdb")&";" Set RecSet = Server.CreateObject("ADODB.Recordset") Addera = "SELECT * FROM nyheter WHERE ID = " &Request.QueryString("id") RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic %>
<%=RecSet("rubrik")%> - <%=FormatDateTime(RecSet("datum"),vbLongdate)%> av <%=RecSet("person")%>
<%=Replace(RecSet("text"),vbCrLf,"
")%>
<-- Tillbaka <% RecSet.Close Connect.Close Set RecSet = nothing Set Connect = nothing End If %> ``` Permalänk: https://www.webforum.nu/p/11815 ## #2 — Pace, 2001-09-27T18:45Z SELECT \* FROM nyheter ORDER BY id DESC. Förutsatt att du har ett fält som heter id. Permalänk: https://www.webforum.nu/p/287546 ## #3 — jorgen, 2001-09-27T18:46Z Hej! ``` SELECT * FROM tabellen ORDER BY Id DESC ``` mvh Jörgen :) Permalänk: https://www.webforum.nu/p/287547 ## #4 — LarsG, 2001-09-27T18:46Z Det beror på hur din tabell är definierad, men du har säkert någon kolumn som anger när en nyhet är inlagd. I så fall är det bara att använda denna select-sats, med ditt kolumnnamn, istället. ``` Addera = "SELECT * FROM nyheter order by datumkolumn desc" ``` Permalänk: https://www.webforum.nu/p/287548 ## #5 — @nders, 2001-09-27T18:46Z Hej! Du får slänga in en sortering, order by, i din sql-fråga. Desc anger du för att sorteringen ska bli fallande. ``` Addera = "SELECT * FROM nyheter ORDER BY ID DESC" ``` Mvh, Permalänk: https://www.webforum.nu/p/287549 ## #6 — Cy-4, 2001-09-27T18:46Z Hallå! Jag tror att det ska gå att lösa genom att lägga till " ORDER BY Datum DESC" på slutet av din sql-sträng. Datum är namnet på den kolumnen som du har datumen på nyheterna lagrade i. Permalänk: https://www.webforum.nu/p/287550 --- Tråden på webben: https://www.webforum.nu/amne/asp/11815-visa-senaste-nyhet-först