Vis næste billede

du kan gøre det med 3 SQL'er en som viser billede og en som finder næste ID og en som finde forrige ID :  visbillede.asp?id=34

id = request.querystring("id")
sql = "SELECT ID FROM billedetabel WHERE ID > " & id
set rs = conn.execute (sql)
if rs.EOF then
  nextID = ""
else
  nextID = rs("id")
end if
sql = "SELECT ID FROM billedetabel WHERE ID < " & id
set rs = conn.execute (sql)
if rs.EOF then
  prevID = ""
else
  prevID = rs("id")
end if
sql = "SELECT billedeSti FROM billedetabel WHERE ID = " & id
set rs = conn.execute (sql)
if not rs.EOF then
  'DIN KODE SOM VISER BILLEDET
end if
if prevID = "" then
  Response.write "Forrige"
else
  Response.write "<a href=visbillede.asp?id="&prevID&">Forrige</a>"
end if
Response.write " | "
if nextID = "" then
  Response.write "Næste"
else
  Response.write "<a href=visbillede.asp?id="&nextID&">Næste</a>"
end if

Det virker jo helt OK

Nu kan jeg se at du har har lavet det sådan at hvis man ser det sidste billede i rækken, forsvinder linket til det næste.

Kan man måske gøre sådan at det løber i en ring. dvs. hvis du ser det sidste billede og man trykker videre, at man så kommer til det første igen. og selvfølgelig også den anden vej.

Jeg har lige fundet en fejl, som jeg ikke lige selv kan lokalisere.
Hvis jeg starter med at vise det første billede og trykker på næste virker det OK, men når jeg så kommer frem til det sidste billede, og trykker på forrige springer den helt tilbage til det første billede.

Denne SQL, sql = "SELECT ID FROM billedetabel WHERE ID < " & id

Skal rettes til:

sql = "SELECT ID FROM billedetabel WHERE ID < " & id & " ORDER BY ID DESC"

Så skulle den vist vælge den rigtige ID til forrige.

OK det virker.

Tror du at man kan få det til at køre i ring.

Når ja det havde jeg glemt...

Ja denne:

  nextID = ""

Skal så udskiftes med:

  sql = "SELECT Min(ID) as nextID FROM billedetabel"
  set rs = conn.execute (sql)
  nextID = rs("nextID")

Ligeledes med prev...:

  prevID = ""

Skal så udskiftes med:

  sql = "SELECT Max(ID) as prevID FROM billedetabel"
  set rs = conn.execute (sql)
  nextID = rs("prevID")