
24/06/2002, 14:03
|
| | Fecha de Ingreso: abril-2002
Mensajes: 49
Antigüedad: 23 años, 1 mes Puntos: 0 | |
paginacion He leido el articulo de paginacion y no lo entiendo.
alguien me puede ayudar a programar la paginacion de 10 en 10 a la siguiente pagina.?
gracias
PD: esta en dos partes
<html>
<head>
<title>Libro de Visitas</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<%
If Request.Form <> "" Then
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("afiliados.mdb"))
TBL.Open "Afiliados" ,DB, 1, 2
TBL.AddNew
TBL("Nombre") = Request.Form("Nombre")
TBL("Apellido") = Request.Form("Apellido")
TBL("Pais") = Request.Form("Pais")
TBL("Mensaje") = Request.Form("Mensaje")
TBL.Update
TBL.Close
DB.Close
Set DB = Nothing
Set TBL = Nothing
Response.Write "<b>Se a agregado sus datos con exito, muchas gracias </b>"
else
%> |