Los Foros de ASPTutor.com
Home | Perfil | Registrarse | Temas Activos | Miembros | Buscar | FAQ
Usuario:
Password:
 Todos los Foros
 ASP
 problemascon esto gracias por todo
 Foro Bloqueado  Tema Bloqueado


Autor Temas
ORLAND
New Member

Peru
57 Posts
Mensajes - 04 Aug 2004 :  20:59:03  Ver Perfil  Enviar Email
ayudenme con esto por favor. no me funciona la paginacion me refiero que sale el numero de paginacion pero al hacer el enlace por ejemplo en el 2 no corre carga la misma pagina. y como puedo vizualisar las tablas de base de datos gracias.
<%
Dim Page
Dim nPages
Dim i
Dim oRSLibro

Page = Session("pagina")
if not (Page <> "") then
Page = 1
end if
If (Page < 1) Then
Page = 1
End If

Establecer_Conexion "", ""
set oRSLibro = CreateObject("ADODB.RecordSet")
oRSLibro.Open "select fecha, titulo, email, nombre, contenido from TLIBRO order by fecha DESC", oConn_, 1, adLockReadOnly, adCmdText
oRSLibro.PageSize = 3
nPages = (oRSLibro.RecordCount \ 3) + 1

if oRSLibro.eof then
Response.write "There is not any signature."
else
oRSLibro.AbsolutePage = Page
i = 1
While ((oRSLibro.EOF = False) and (i <= oRSLibro.PageSize))
Response.write "Date: " & FormatDateTime(oRSLibro("fecha"),2) & "<br>"
Response.write "Name: " & oRSLibro("nombre") & "<br>"
if Not IsNull(oRSLibro("email")) then
Response.write "E-Mail: " & oRSLibro("email") & "<br>"
end if
Response.write "Title: " & oRSLibro("titulo") & "<br>"
Response.write oRSLibro("contenido") & "<br>"
i = i+1
oRSLibro.moveNext
Response.write "<hr align=""left"" width=""100%"" size=""1"">"
wend
end if
oRSLibro.close
Cerrar_Conexion

if nPages > 1 then
Response.write "<font face=""VERDANA,ARIAL NARROW,ARIAL"" size=""1"">Page "&Page&" of "&nPages&"</font><br>"
Response.write "<font face=""VERDANA,ARIAL NARROW,ARIAL"" size=""1"">Page Number:</font>"
for i=1 to nPages
Response.write "<a href=libro.asp?pagina="&i&">"&i &"</a>"
Response.write " "
Next
end if
%>

<p>
<tr><td><table border=1 align="center" bgcolor="#000000" width="50%" CELLSPACING=0 CELLPADDING=0>
<TBODY>
<tr><td align="center"><FONT COLOR="#FFFF00" FACE="VERDANA,ARIAL NARROW,ARIAL" size="2">
<b>To sign it executes the following form:</b></font></td></tr>
<tr><td bgcolor="#808080"><FONT COLOR="#FFFFFF" FACE="VERDANA,ARIAL NARROW,ARIAL" size="1">
<form action="insertar.asp" method="post">
&nbsp;&nbsp;&nbsp;&nbsp;<b>Name:</b>&nbsp;&nbsp;<input type="text" name="nombre" size="20" maxlength="50"><br>
&nbsp;&nbsp;&nbsp;&nbsp;<b>E-Mail:</b>&nbsp;&nbsp;<input type="text" name="email" size="30" maxlength="50"><br>
&nbsp;&nbsp;&nbsp;&nbsp;<b>Title:</b>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<input type="text" name="titulo" size="30" maxlength="100"><br>
<center><b>Content:</b><br><textarea cols="40" rows="7" name="contenido"></textarea><br>
<input type="submit" value="Send">
</form></center></font>

pricipiante en asp.

   
 Foro Bloqueado  Tema Bloqueado
Ir a:
Los Foros de ASPTutor.com Los Foros de ASPTutor.com
Ir al principio de la Página

 Imprimir Tema
 

Descargas de manuales¦ Ejemplos de código ¦ Artículos mas visitados ¦ Envía tu articulo ¦ Foros ¦
  Libro de visitas ¦Crea un enlace con ASPTutor 
 

    © 2001-Hasta hoy  Pedro Rufo Martín  contactar