--- title: "De senaste nyheterna" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/7383-de-senaste-nyheterna" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "Jacob" published: "2000-12-09T14:19:00.000Z" updated: "2000-12-10T19:15:00.000Z" replies: 4 views: 160 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/7383-de-senaste-nyheterna" --- # De senaste nyheterna ## #1 — Jacob, 2000-12-09T14:19Z Jag har en nyhetsdatabas och den börjar bli ganska stor. Jag undrar hur man gör för att bara tex visa de sista 10 nyheterna? Nu ser koden ut på följande sätt: ``` <% Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=c:\inetpub\wwwroot\videomonitor\adressbok.mdb" Set RecSet = Server.CreateObject("ADODB.Recordset") If Request.QueryString("videonyheter") = "alla" Then Addera = "SELECT * FROM filmnyheter ORDER BY Datum DESC" RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic %>

<% =RecSet("rubrik") %>

``` Permalänk: https://www.webforum.nu/p/7383 ## #2 — @nders, 2000-12-09T14:23Z SELECT TOP 10 \* FROM filmnyheter ORDER BY \[Datum\] DESC Permalänk: https://www.webforum.nu/p/252547 ## #3 — Jacob, 2000-12-10T10:24Z Tack så mycet det fungerar men jag har en sak till angående detta. Kna man inte köra flera i samma visa titta på det här: ``` Set RecSet = Server.CreateObject("ADODB.Recordset") If Request.QueryString("filmnyheter") = "alla" Then Addera = "SELECT * FROM filmnyheter ORDER BY [Datum] DESC" ElseIf Request.QueryString("filmnyheter") = "10" Then Addera = "SELECT TOP 10 * FROM filmnyheter ORDER BY [Datum] DESC" RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic %> ``` När jag gör så här så fungera bara den ena av dom. Permalänk: https://www.webforum.nu/p/252548 ## #4 — @nders, 2000-12-10T10:41Z ``` Set RecSet = Server.CreateObject("ADODB.Recordset") strselectmode = request.querystring("filmnyheter") select case strselectmode case "alla" Addera = "SELECT * FROM filmnyheter ORDER BY [Datum] DESC" case "10" Addera = "SELECT TOP 10 * FROM filmnyheter ORDER BY [Datum] DESC" end select RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic ``` Permalänk: https://www.webforum.nu/p/252549 ## #5 — Jacob, 2000-12-10T19:15Z Ännu en gång stort tack @ndres Permalänk: https://www.webforum.nu/p/252550 --- Tråden på webben: https://www.webforum.nu/amne/asp/7383-de-senaste-nyheterna