Her er en måde, hvorpå du kan lave paging i asp via ado.
Paging er hvor en bruger kan klikke sig gennem dit recordset lidt af gangen. F.eks. hvis du kun vil vise 10 records pr. side, og så kan brugeren selv klikke sig gennem de andre sider med 10 i hver. Fuldstændig ligesom søgemaskinerne (Altavista, Google....).
**************** Paging.asp *****************
<!--#INCLUDE FILE="adovbs.inc"-->
<%
dim thisPage, rowcount, i
Page = Trim(Request("Page"))
if Page = "" then Page = 1
set cnn = server.CreateObject("ADODB.Connection")
cnn.Open "DIN CONNECTIONSTRING"
set rst = Server.CreateObject("ADODB.Recordset")
with rst
.CursorType = adOpenStatic
.PageSize = 10
.Open "SELECT * from person", cnn
.AbsolutePage = cINT(Page)
end with
rowCount = 0
while not rst.EOF and rowCount < rst.PageSize
Response.Write "<a href='" & rst("Navn") & "'>" & rst("Telefon") & "</a><br>"
rowCount = rowCount + 1
rst.MoveNext
wend
Response.Write "<br clear=all>Næste side >"
for i = 1 to rst.PageCount
Response.Write "<a href='paging.asp?Page=" & i & "'>" & i & "</a>"
next
%>