intPage = Request("page") If isNumeric(intPage) = False Or intPage < 1 Then intPage = 1 End If Set record = Server.CreateObject("ADODB.RecordSet") Sql = "SELECT * FROM tabel WHERE tilbud='2' ORDER BY id DESC"
record.Open Sql,Conn,1
If Not (record.BOF Or record.EOF) Then record.PageSize = 10 record.AbsolutePage = intPage intRecCount = record.PageSize intPageCount = record.PageCount
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.