Tengo el siguiente codigo:
 
SQL = "SELECT * from tblProducts where des_larga like " & "'%" & Request.Form("find") & "%'"
set rs = CreateObject("ADODB.Recordset")
rs.CursorType = 3
rs.Open SQL, "DSN=Franco"
if not rs.eof then
rs.pagesize=12 
rs.absolutepage=RSPage
TotalPages=rs.pagecount
end if
if rs.eof then
response.write "El articulo no existe"
end if
 
do while not rs.EOF 
Response.Write "<a href=" + rs("des_corta") + ">" + rs("des_larga") + "</a><Br>" 
rs.MoveNext ' Movenext
loop
 
Lo que se trata es de hacer una busqueda, funciona pero quiero paginar los resultados pero cuando coloco:
 
if not rs.eof then
rs.pagesize=12 
rs.absolutepage=RSPage
TotalPages=rs.pagecount
end if
 
 
Me manda el siguiente error:
 
ADODB.Recordset error '800a0bb9' 
 
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another. 
 
Que estoy haciendo mal?
 
Gracias por anticipado.  
  
  
 
