Подскажите плз, как мне можно организовать постраничный вывод данных из базы Access. Очень нужно!

Вот полазил по справкам, нашел такие интересные вещи, как PageSize, PageCount & AbsolutePage. Вот исходник работающего (вроде, проверьте плз) скрипта

Код

<%@ LANGUAGE="VBScript" %>      <%    Dim CONN    Dim REC, filepath    filepath=Server.MapPath("la-la-la.mdb")         Set CONN = Server.CreateObject("ADODB.Connection")   CONN.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&filepath   Dim strSQL   strSQL = "SELECT tra-la-la FROM la-la-la"     Set REC = Server.CreateObject("ADODB.Recordset")   REC.PageSize = 10   REC.Open strSQL, objConnection, 1   REC.AbsolutePage = Request.QueryString("Page")   %>   <P>Page <%Response.Write(Request.QueryString("Page"))%>   of <%=REC.PageCount%></P>     <%   Dim i   Do While (REC.EOF) AND (i<REC.PageSize)   i=i+1    %> ......................   <%   REC.MoveNext   Loop   %> <% Dim a For a=1 To REC.PageCount %> <A href="test.asp?Page=<% Response.Write(a) %>"><% Response.Write(a) %></a> <% Next %> <%  REC.Close  REC.Close  REC = Nothing  Set REC = Nothing   %>

Это сообщение отредактировал(а) DIMA.NET - 20.6.2003, 04:27