count etc.
<%intPage = Request("page")
If isNumeric(intPage) = False Or intPage < 1 Then
intPage = 1
End If
Set rs = Server.CreateObject("ADODB.Recordset")
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("../../cgi-data/film.mdb")
strSQL = "SELECT * FROM tblFilm ORDER BY " & Request.QueryString("sort")
rs.Open strSQL, strDSN, 1
If Not (rs.BOF Or rs.EOF) Then
rs.PageSize = 5
rs.AbsolutePage = intPage
intRecCount = rs.PageSize
intPageCount = rs.PageCount
%>
som det kan ses har jeg implementeret en paging løsning på min asp side. Det jeg mangler er følgende:
1) En Select count(*) as ... - jeg kan simpelthen ikke få det til at virke med recordset!
2) En funktion der skriver: de ser nu nr.10-19, og på den næste side skal der så stå nr.20-29. (ligesom der også er her på eksperten)
Håber nogen gider hjælpe
