Avatar billede eromaster Nybegynder
22. juli 2003 - 13:53 Der er 9 kommentarer og
1 løsning

Vælg den 5 nyeste nyhed

Jeg har et script som trækker de 5 nyeste nyhed ud af en access database og linker til dem med billede:

      <%
      Set DataConn = Server.CreateObject("ADODB.Connection")
      DSN = "DRIVER={Microsoft Access Driver (*.mdb)};uid=admin; "
      DSN = dsn & "DBQ=" & server.mappath("db/nyheder.mdb")
      DataConn.Open DSN
     
      Set nyhed = Server.CreateObject("ADODB.RecordSet")
      nyhed.open "Select Top 5 * From [nyheder] order by id desc", DataConn
      if not nyhed.EOF then
      nyhed.MoveFirst
      end if
      do while not nyhed.EOF
      %>
     
      <a href="?id=<%=nyhed("id")%>"><img src="<%=nyhed("logo")%>"></a>

      <%
      nyhed.MoveNext
      loop
      nyhed.Close
      set nyhed = nothing
      Dataconn.Close
      %>

Hvordan trækker jeg de næste 5 ud af databasen? det vil sige den 6' nyeste derefter den 7 ' nyeste osv.
Avatar billede Slettet bruger
22. juli 2003 - 13:56 #1
Select Top 10 * From nyheder order by id desc
Avatar billede Slettet bruger
22. juli 2003 - 13:57 #2
Og hvis den skal vise alle nyheder så Select * from nyheder order by id desc
Avatar billede eromaster Nybegynder
22. juli 2003 - 13:58 #3
Det var ikke det jeg spurgte efter...
Avatar billede Slettet bruger
22. juli 2003 - 13:58 #4
Hvad så?
Avatar billede eromaster Nybegynder
22. juli 2003 - 13:59 #5
Jeg skal jo IKKE have de 10 nyeste:

Nyhed 1-5 bliver vist med billede oven over i scripted.

Jeg derefter bruge nyhed 6-10 bare med et link, lad os sige: <a href="?id=<%=nyhed("id")%>"><%=nyhed("overskrift")%></a>
Avatar billede kimbo Nybegynder
22. juli 2003 - 14:05 #6
prøv den her

select TOP 10 * from [nyheder] WHERE id NOT IN (select TOP 1 id from [nyheder] ORDER BY ID DESC) ORDER BY ID DESC
Avatar billede kimbo Nybegynder
22. juli 2003 - 14:06 #7
skulle være sådan her

select TOP 10 * from [nyheder] WHERE id NOT IN (select TOP 5 id from [nyheder] ORDER BY ID DESC) ORDER BY ID DESC
Avatar billede Slettet bruger
22. juli 2003 - 14:07 #8
Virker jeres søg på på expttren?
Avatar billede kimbo Nybegynder
22. juli 2003 - 14:09 #9
papir --> nej, det har det ikke gjort et par dage nu
Avatar billede eagleeye Praktikant
22. juli 2003 - 14:10 #10
Det papir har forslået er det det letteste hendte de 10 nyeste nyheder, dog vil jeg tilføje at du så laver en tæller i dit loop som enten udskriver billet eller overskfiten såda her. Så ungår du at skulle lave to SQL kald.:


      nyhed.open "Select Top 10 * From [nyheder] order by id desc", DataConn
      if not nyhed.EOF then
      nyhed.MoveFirst
      end if
      antal=0
      do while not nyhed.EOF
      %>
      <a href="?id=<%=nyhed("id")%>">
      <% if antal < 5 then %>
        <img src="<%=nyhed("logo")%>">
      <% else
          response.write nyhed("overskrift")
        end if %>
      </a>
      <%
      antal=antal+1
      nyhed.MoveNext
      loop
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester



Seneste spørgsmål Seneste aktivitet
I dag 14:04 Pixeline cd’er til PC Af Mathilde i Windows
I dag 01:14 Windows 10 - IIS 10 Af bsn i Windows
I går 20:39 Boot fra USB Af poulmadsen i Windows
I går 11:43 Gmail-ikon på skrivebordet Win 10 Af ErikHg i Fri debat
I går 09:22 Lopslag Af Luffe i Excel