webForumDet fria alternativet

Nästa sida - ej vanlig paging

5 svar · 573 visningar · startad av Asa

AsaMedlem sedan dec. 20011 860 inlägg
#1

Jag vill bläddra bland poster ifrån en databas som har olika kategorier som kan ligga lite huller om buller. Hur skriver jag för att få reda på vilken som är nästa post samt föregående i databasen i just en speciell kategori. Jag kanske inte tänkt tillräckligt men hoppas på svar.

@ndersMedlem sedan juni 200032 969 inlägg
#2

Varför inte använda paging? Posternas ordning har ingen betydelse, det som har betydelse är hur du sorterar dem i SQL-frågan.

Annars kan du ju helt enkelt fråga:

SELECT foo FROM tbl WHERE foo > 4 AND cat = 4
AsaMedlem sedan dec. 20011 860 inlägg
#3

Tänkte göra enkelt med lite kod där jag bara hämtar ID-numret och sätter det i länken för nästa sida och föregående.

@ndersMedlem sedan juni 200032 969 inlägg
#4

Ok, enl. mitt exempel ovan då?

AsaMedlem sedan dec. 20011 860 inlägg
#5

Föregående blir fel..

<table cellspacing="0" cellpadding="0" border="0" width="100%">
<%Set VimPic = Conn.Execute("Select bildnamn,info,bildID From photos Where vimmelNr=" & strID & " and bildID=" & strBildID)

If VimPic.EOF Then%>
  <tr> 
    <td align="center">Inga bilder!</td> 
  </tr> 
<%Else%>
  <tr> 
    <td align="center" valign="middle"><img src="gfx/photos/ID_<%=strID%>/<%=VimPic(0)%>" border="0" name="img1"></td>
  </tr> 
  <tr height="25"> 
    <td align="center" valign="middle"><%=VimPic(1)%></td>
  </tr> 
  <%Conn.Execute("Update photos set visad=visad+1 Where bildID=" & Cint(VimPic(2)))%>

  <tr bgcolor="#dddddd">
    <td align="center" style="border-top: 1px solid #000000" valign="top">
      <table border="0" cellspacing="3" width="100%">
        <tr>
          <td valign="top">
            <%Set strPrev = Conn.Execute("Select bildID From photos Where vimmelNr=" & strID & " and bildID < " & strBildID)
            If strPrev.EOF Then%>
              << Bakåt
            <%Else%>
              <a href="view.asp?show=<%=strID%>&bildID=<%=strPrev(0)%>"><b><< Bakåt</b></a>
            <%End If
            strPrev.Close:Set strPrev=Nothing%>
            | 
            <%Set strNext = Conn.Execute("Select bildID From photos Where vimmelNr=" & strID & " and bildID > " & strBildID)
            If strNext.EOF Then%>
              Nästa >>
            <%Else%>
              <a href="view.asp?show=<%=strID%>&bildID=<%=strNext(0)%>"><b>Nästa >></b></a>
            <%End If
            strNext.Close:Set strNext=Nothing%>
          </td>
        </tr>
      </table>
    </td>
  </tr>
<%End If
VimPic.Close:Set VimPic=Nothing%>
</table>
AsaMedlem sedan dec. 20011 860 inlägg
#6

La till detta i tillbakalänken och då funkade det:
& " Order by bildID desc"

138 ms totalt · 3 externa anrop · v20260731065814-full.fb544a5a
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
135 ms — hämta tråd, inlägg och bilagor (db)