Ver Mensaje Individual
  #1 (permalink)  
Antiguo 18/08/2008, 05:36
haga41
 
Fecha de Ingreso: junio-2008
Mensajes: 145
Antigüedad: 16 años, 11 meses
Puntos: 0
Ayuda con errores en paginación

Buenos días a todos,

He estado intentando impletando la paginación en una web que estoy haciendo y más o menos he conseguido entender con un código que encontré por ahí como funciona. Me divide los registros en páginas correctamente y todo eso pero me da el siguiente error "Error de sintaxis (falta operador) en la expresión de consulta 'Genero =1?pag=2'." al intentar cambiar de página.

Este es el código de la página listado.asp que es un listado de películas por diferentes géneros. Al pulsar en un género se muestran las 10 primeras películas de ese género y debajo aparecen links a las siguientes páginas si las hay.

Código HTML:
<div class="menu31">
	<div class="blanco">
   <% id= request("id")   
	ssql = "Select * from PELICULAS where Genero =" & id & " ORDER by Titulo asc"
	tabla.Open ssql,conexion,adopenstatic,adcmdtext

num_registros = 9 
 session("ssql")=ssql
	   %>
       
<%If Request.QueryString("pag")<>"" Then
   Session("pagina")=Request.QueryString("pag")
Else
   Session("pagina")=1
End If

tabla.PageSize=num_registros
tabla.AbsolutePage=Session("pagina")
%>
<div align="center">
Número de página actual: <b><%=Session("pagina")%></b>
<br>
Número de páginas total: <b><%=tabla.PageCount%></b>
<br>
Número de registros por página: <b><%=tabla.PageSize%></b>
<br>
Número de registros seleccionados: <b><%=tabla.RecordCount%></b>
</div>

	   
<%
num_campos=tabla.Fields.Count
For campo=0 to num_campos-1%>
   
<%
Next
registros_mostrados = 0
While (Not tabla.eof And registros_mostrados < num_registros)
   registros_mostrados = registros_mostrados +1
%> 
<%For campo=0 to num_campos-1 %>
   <%Next%>
			
 			<div class="fila">
            	<div class="lista1">
                <a href="detalle.asp?id=<%=tabla.fields("id")%>" title="Detalle" target="_self"><img class="imagen" style="border: 1px solid #0000;"  src="miniaturas/<%=tabla.fields("foto")%>" /></a>
                </div>   
                    <div class="lista">
                        <ul>
                           <li><span class="negrita"><a href="detalle.asp?id=<%=tabla.fields("id")%>" title="Detalle" target="_self"><%=tabla.fields("Titulo")%></a></span> <a href="buscaranio.asp?anio=<%=tabla.fields("Anio")%>" target="_self">(<%=tabla.fields("Anio")%>)</a></li>
                            <li><span class="gris"><a href="buscarpais.asp?pais=<%=tabla.fields("Pais")%>" target="_self"><%=tabla.fields("Pais")%></span></a></li>
                            <li><span class="lnegro"><a href="buscardirector.asp?director=<%=tabla.fields("Director")%>" target="_self"><%=tabla.fields("Director")%></span></a></li>
                            <li><%=tabla.fields("Interpretes")%></li>
                        </ul>
                    </div>
                </div>                      
                
		    <% tabla.movenext
			Wend %>
                
                            <div class="fila">
            	<div class="lista1">
                <a href="detalle.asp?id=<%=tabla.fields("id")%>" title="Detalle" target="_self"><img class="imagen" style="border: 1px solid #0000;"  src="miniaturas/<%=tabla.fields("foto")%>" /></a>
                </div>          
                    <div class="lista">
                        <ul>
                           <li><span class="negrita"><a href="detalle.asp?id=<%=tabla.fields("id")%>" title="Detalle" target="_self"><%=tabla.fields("Titulo")%></a></span> <a href="buscaranio.asp?anio=<%=tabla.fields("Anio")%>" target="_self">(<%=tabla.fields("Anio")%>)</a></li>
                            <li><span class="gris"><a href="buscarpais.asp?pais=<%=tabla.fields("Pais")%>" target="_self"><%=tabla.fields("Pais")%></span></a></li>
                            <li><span class="lnegro"><a href="buscardirector.asp?director=<%=tabla.fields("Director")%>" target="_self"><%=tabla.fields("Director")%></span></a></li>
                            <li><%=tabla.fields("Interpretes")%></li>
                        </ul>
                    </div>
                </div>      
                
<%   i=0
While i<tabla.PageCount
   i=i+1
%>
   <b><a href="listado.asp?id=<%=id%>?pag=<%=i%>"><%=i%></a></b>
<%
Wend
%>                              
				 
       <% tabla.close %>

</div> 
Esta página tiene un include a la página AbrirBd.asp que tiene este código
Código HTML:
<%Set conexion = Server.CreateObject("ADODB.Connection")
Set tabla = Server.CreateObject("ADODB.recordset")
Set tabla2 = Server.CreateObject("ADODB.recordset")


Const adCmdText = &H0001
Const adOpenStatic = 3

conexion.open "PROVIDER=MICROSOFT.JET.OLEDB.4.0; Data Source="&server.MapPath("pelis.mdb")%>