Tengo este Script ASP para mostrar los resultados de una base de datos Access en la web, me podrian ayudar para paginar los resultados de 10 en 10,
Este es el Script:
Código:
<%
Dim DB, TBL
Set DB = Server.CreateObject("ADODB.Connection")
Set TBL = Server.CreateObject("ADODB.RecordSet")
DB.Mode = adModeReadWrite
DB.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" + Server.MapPath("../../db/tutoriales.mdb"))
TBL.Open "Tutoriales" ,DB
While NOT TBL.EOF
Response.Write("<b>Título</b>: " & TBL("Titulo") & "<br>")
Response.Write("<b>Fecha</b>: " & TBL("Fecha") & "<br>")
Response.Write("<b>Autor</b>: " & TBL("Autor") & "<br>")
Response.Write("<b>Correo-e</b>: <a href=""mailto:" & TBL("Correo-e") & """>" & TBL("Correo-e") & "</a><br>")
Response.Write("<b>URL</b>: <a target=""_brank"" href=""../enlaces_externos/default.asp?pagina=" & TBL("URL") & """>" & TBL("URL") & "</a><br>")
Response.Write("<b>Descripción</b>: " & TBL("Descripcion") & "<br><br>")
TBL.MoveNext
Wend
TBL.Close
DB.Close
Set DB = Nothing
Set TBL = Nothing
%>
Gracias