Javascript: Nuevo Capítulo de 120 segundos

Retroceder   Foros del Web > Programación para sitios web > ASP Clásico
Actualizar esta página pregunta de para paginación
Registrarse Ayuda Miembros Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Desplegado
Antiguo 02-jul-2008, 12:41   #1 (permalink)
ric18 ha deshabilitado el karma
 
Fecha de Ingreso: marzo-2007
Mensajes: 37
pregunta de para paginación
Saludos

Después de batallar un poco con un script para paginar datos, obtuve resultados con este script, el problema que tengo es que al cambiar la estructura de como quiero que llame a los registros ya no me funciona la paginación.

¿Que error estoy haciendo?

Gracias


Código PHP:
<&#37;@LANGUAGE='VBScript'%>

<!--#INCLUDE File="conecta.asp" -->

 
<%

Set rs=Server.CreateObject("adodb.recordset")
    
rsnews= "SELECT ID,TITULO,SUMARIO FROM NEWS"

    rs.pagesize=1
    rs.CursorLocation=3
    rs.CursorType=1

rs.Open rsnews,dbConn

 link= rs ("ID")
 linkB = "MMX_NewsD.asp?id=" &link
 titulo= rs("TITULO")
 sumario= rs("SUMARIO")



Pagina = Request.QueryString("pagina")
if pagina < "1" or pagina = "" then
      pagina = "1"
end if
if not rs.eof then
      
      rs.AbsolutePage = pagina
end if
%>
<Table width=100%>
      <TR>
            <TD>ID Noticia</TD>
            <TD>Titulo</TD>
            <TD>Resumen</TD>
      </TR>
<%

For i = 1 to 1
      
      if not rs.eof then
            
            'Response.write ("<TR><TD>"&rs("titulo")&"</TD><TD>"&rs("sumario")&"</TD></TR>")

'**** <-- Si utilizo esta linea si funciona la paginaci&#243;n-->****
            'Response.write ("<TR><TD>"&rs("ID")&"</TD><TD>"&rs("titulo")&"</TD><TD>"&rs("sumario")&"</TD></TR>")

' *** <--- Si uso esta otra ya no jala -->****

            Response.write("<table>")
            Response.write("<td>")
            Response.write("<tr><a href="&linkB&">"&titulo& "</a></tr>" ) 
            Response.Write("<tr>"&sumario& "</tr>")
            Response.Write"<tr>" &imagen& "</tr>"
            Response.Write("</td>")
            Response.Write("</table>")

         
            rs.MoveNext
      end if
next
%>
</Table>

<Table  Width="600" border="0" align="center">
      <TR>
            
            <%if pagina = "1" then%>
                  <TD width="25%" align="center"> << </TD>
                  <TD width="25%" align="center"> < </TD>
            <%else%>
                  <TD width="25%" align= "center"><a href="paginador.asp?pagina=0"> << </a></TD>
                  <TD width="25%" align= "center"><a href="paginador.asp?pagina=<%=pagina-1%>"> < </a></TD>
            <%end if%>
            
            <%if int(pagina) => rs.PageCount then%>
                  <TD width="25%" align="center"> > </TD>
                  <TD width="25%" align="center"> >> </TD>
            <%else%>
                  <TD width="25%" align= "center"><a href="paginador.asp?pagina=<%=pagina+1%>"> > </a></TD>
                  <TD width="25%" align= "center"><a href="paginador.asp?pagina=<%=rs.PageCount%>"> < </a></TD>
            <%end if%>
      </TR>
</Table> 
ric18 está desconectado   Responder Citando
Antiguo 02-jul-2008, 13:23   #2 (permalink)
juanesquiz ha deshabilitado el karma
 
Fecha de Ingreso: abril-2008
Ubicación: México
Mensajes: 2
Enviar un mensaje por MSN a juanesquiz
Respuesta: pregunta de para paginación
oye el error no sera en esta linea:

linkB = "MMX_NewsD.asp?id=" &link <----- y esto que??, creo que le falta el otro & y las comillas dobles.

creo que queda asi:

linkB = MMX_NewsD.asp?id=" & link & "
.
.
.
<a href="" & linkB & "">.....

espero te funcione de algo!!!
saludos!!!
suerte!!!
Última edición por juanesquiz; 02-jul-2008 a las 13:29.
juanesquiz está desconectado   Responder Citando
Antiguo 02-jul-2008, 14:04   #3 (permalink)
Colaborador
JuanRAPerez tiene algunos puntos positivos de karma
 
Avatar de JuanRAPerez
 
Fecha de Ingreso: octubre-2003
Mensajes: 1.808
Respuesta: pregunta de para paginación
cuentanos que es exactamente:

Cita:
el problema que tengo es que al cambiar la estructura de como quiero que llame a los registros ya no me funciona la paginación
no pagina?
no se ve bien la tabla?
da error el código?

suerte
__________________
JuanRa Pérez
San Salvador, El Salvador
JuanRAPerez está desconectado   Responder Citando
Antiguo 02-jul-2008, 14:29   #4 (permalink)
ric18 ha deshabilitado el karma
 
Fecha de Ingreso: marzo-2007
Mensajes: 37
Respuesta: pregunta de para paginación
Cita:
Iniciado por JuanRAPerez Ver Mensaje
cuentanos que es exactamente:



no pagina?
no se ve bien la tabla?
da error el código?

suerte
Pues no pagina, aunque si me muestra los consecutivos....

con esta línea si lo hace
Código PHP:
Response.write ("<TR><TD>"&rs("ID")&"</TD><TD>"&rs("titulo")&"</TD><TD>"&rs("sumario")&"</TD></TR>") 
Pero si lo cambio a esto ya no lo hace, me muestra el primer registro de la noticia, pero cuando le doy al link de siguiente ya no pasa a la segunda noticia

Código PHP:



Set rs=Server.CreateObject("adodb.recordset")
    
rsnews= "SELECT ID,TITULO,SUMARIO FROM NEWS"

    rs.pagesize=1
    rs.CursorLocation=3
    rs.CursorType=1

rs.Open rsnews,dbConn

 link= rs ("ID")
 link = "MMX_NewsD.asp?id=" & link <-- Lo unico que hace es colocar el "id" de la siguiente noticia, si lo cierro me marca un error de sintáxis
 titulo= rs("TITULO")
 sumario= rs("SUMARIO") 
Despues mando llamar asi

Código PHP:
Response.write("<table>")
            Response.write("<td>")
            Response.write("<tr><a href="&link&">"&titulo& "</a></tr>" ) 
            Response.Write("<tr>"&sumario& "</tr>")
            Response.Write("</td>")
            Response.Write("</table>") 
O sea que cambio una línea por esto
ric18 está desconectado   Responder Citando
Antiguo 02-jul-2008, 14:57   #5 (permalink)
ric18 ha deshabilitado el karma
 
Fecha de Ingreso: marzo-2007
Mensajes: 37
Respuesta: pregunta de para paginación
Bien ya quedó solucionado el asunto, tuve que quitar las variables y dejar el código como sigue, pego todo el código por si hay alguien que lo quiera ocupar, principalmente lo pensé para colocar un sistema de noticias en la página inicial.

Código PHP:
<%@LANGUAGE='VBScript'%>

<!--#INCLUDE File="conecta.asp" -->

 
<%

Set rs=Server.CreateObject("adodb.recordset")
    
rsnews= "SELECT ID,TITULO,SUMARIO FROM EWS"

    rs.pagesize=1
    rs.CursorLocation=3
    rs.CursorType=1

rs.Open rsnews,dbConn


Pagina = Request.QueryString("pagina")
if pagina < "1" or pagina = "" then
      pagina = "1"
end if
if not rs.eof then
      'Indicamos que pagina debe de mostrar
      rs.AbsolutePage = pagina
end if
%>
<Table width=100%>
      <TR>
            <TD>ID Noticia</TD>
            <TD>Titulo</TD>
            <TD>Resumen</TD>
      </TR>
<%

For i = 1 to 1
      '
      if not rs.eof then
            
</TD><TD>"&rs("titulo")&"</TD><TD>"&rs("sumario")&"</TD></TR>")
            Response.write("<table>")
            Response.write("<td>")
            Response.write("<tr><a href=MMX_NewsD.asp?id="&rs("id")&">"&rs("titulo")& "</a></tr>" ) 
            Response.Write("<tr>"&rs("sumario")& "</tr>")
            'Response.Write"<tr>" &imagen& "</tr>"
            Response.Write("</td>")
            Response.Write("</table>")


            rs.MoveNext
      end if
next
%>
</Table>

<Table  Width="600" border="0" align="center">
      <TR>
            
            <%if pagina = "1" then%>
                  <TD width="25%" align="center"> << </TD>
                  <TD width="25%" align="center"> < </TD>
            <%else%>
                  <TD width="25%" align= "center"><a href="paginador.asp?pagina=0"> << </a></TD>
                  <TD width="25%" align= "center"><a href="paginador.asp?pagina=<%=pagina-1%>"> < </a></TD>
            <%end if%>
            <!--navegacion hacia paginas posteriores-->
            <%if int(pagina) => rs.PageCount then%>
                  <TD width="25%" align="center"> > </TD>
                  <TD width="25%" align="center"> >> </TD>
            <%else%>
                  <TD width="25%" align= "center"><a href="paginador.asp?pagina=<%=pagina+1%>"> > </a></TD>
                  <TD width="25%" align= "center"><a href="paginador.asp?pagina=<%=rs.PageCount%>"> < </a></TD>
            <%end if%>
      </TR>
</Table> 
ric18 está desconectado   Responder Citando
Respuesta

No hay votos aún.


« Tema Anterior | Próximo Tema »
Herramientas
Desplegado
Mode Lineal Mode Lineal

Normas de Publicación
No puedes crear nuevos temas
No puedes responder temas
No puedes subir archivos adjuntos
No puedes editar tus mensajes
BB code is Activado
Caritas están Activado
[IMG] está Activado
Código HTML está Desactivado


La Zona horaria es GMT -6. Ahora son las 14:47.

Contáctenos - Foros del Web - Archivo - Arriba

Message Board Statistics

LinkBacks Enabled by vBSEO 3.1.0

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93