Ver Mensaje Individual
  #1 (permalink)  
Antiguo 14/06/2004, 14:51
dacotta
 
Fecha de Ingreso: noviembre-2003
Mensajes: 67
Antigüedad: 21 años, 5 meses
Puntos: 0
Problemas Con Paginacion Y Sql

Saludos estoy utilizando este codigo y me funciona perfectamente:

<head>
<%
if (Request.Form("pagina")=="anterior"){
Session("pagina")=Session("pagina")-1}
else{
if(Request.Form("pagina")=="seguent"){
Session("pagina")=Session("pagina")+1}
else{
Session("pagina")=1
}
}

var sublink=new ActiveXObject("adodb.RecordSet")
sublink.Open("links",con, adOpenDynamic, adCmdText )sublink.PageSize=5
sublink.AbsolutePage=Session("pagina")
var i=0
var numcamps=sublink.Fields.count
var n=0

%>

</head>
<body text=white <%=fons%> <%=marge%> >

<!--#include file="inic.asp"-->
<table border=1>

<%
n=0
while((sublink.eof==false)&&(n<sublink.PageSize)){
n++%>
<tr>


<td><div id=ele><%=sublink("nomlink")(i)%></div></td>



</tr>
<%sublink.MoveNext()
}
%>
</table>

<form method=post action="links2.asp">
<%if (Session("pagina")!=1){%>
<input type=submit name=pagina value=anterior>
<%}%>
<%if(Session("pagina")!=sublink.PageCount){%>
<input type=submit name=pagina value=seguent>
<%}%>
</form>
etc...

pero ahora me interesa que de mi base de datos solo me selccione unos cuantos que yo le defino y canvio la frase en rojo por esta:

sublink.Open("select * from links where categorialink="+("0"), con, adOpenDynamic, adCmdText )

y me da el siguiente error:

ADODB.Recordset error '800a0cb3'

La operación solicitada por la aplicación no es admitida por el proveedor.



gracias
__________________
Soy lo suficientemente feo y bajito
como para triumfar por mi mismo.
( Woody Allen )