Nyhetsscript med paging

Hej!

Hur gör man om man t.ex har ett nyhetsscript.
På en sida listar man alla nyhetetsrubriker sorterade efter datum.
Klickar man på en rubrik så kommer man till en ny sida där man kan läsa nyheten.
Så långt, inga problemos :)

Men.
Om man nu skulle vilja kunna stega bakåt resp. framåt får att kunna läsa tidigare resp. senare nyheter, hur gör man då? :OO

Det skulle väl kanske kunna funka såhär?

strSQL = "SELECT * FROM nyheter ORDER BY datum DESC"
Set objRS = objConn.Execute(strSQL)
strSQL = "SELECT COUNT(*) FROM nyheter"
Set objCount = objConn.Execute(strSQL)
intCount = objCount(0)
Set objCount = Nothing

If Request.QueryString("pg") = "" Then
  intPage = 1
Else
  intPage = CInt(Request.QueryString("pg"))
End If

If intPage > 1 Then
  For i = 1 To (intPage - 1)
    objRS.MoveNext
  Loop
End If

Response.Write(objRS("författare") & "<p>" & objRS("nyhet"))

If intPage > 1 Then
  Response.Write("<a href=""nyhet.asp?pg=" & intPage - 1 & """>Föregående</a> | ")
Else
  Response.Write("Föregående | ")
End If

If intPage < intCount Then
  Response.Write("<a href=""nyhet.asp?pg=" & intPage + 1 & """>Nästa</a>")
Else
  Response.Write("Nästa")
End If

Set objRS = Nothing

Och att använda Getrows() med paging knäcker prestandamässigt. ;)

/red Äsch... Det var jag som missförstod vad det var han ville och gjorde det krångligare än det behövde bli. :r