Error: ADODB.Recordset error '800a0bb9'

[amancio]

Hola buenos dias. Alguien podria ayudarme con 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.

/cibernilo/buscanilo/resultado.asp, line 72

Estaba trabajando muy bien con la base de datos, la descargue a mi disco duro para eliminar unas cosas que ya no sirven, cuando lo subi al servidor ya no pude ver nada, solo veo ese error, en la lines 72 de resultado.asp tengo esto:

Dim RS, sql
set RS = Server.CreateObject("ADODB.Recordset")
keyword = request("keyword")
sql = "select * from search where name like '%" & keyword & "%' or editorial like '%" & keyword & "%' or description like '%" & keyword & "%' or keywords like '%" & keyword & "%';"
RS.Open sql, conn, adOpenStatic, adLockReadOnly, adCmdText (LINEA 72)
if NOT RS.EOF then
RS.movefirst

Agradeceria mucho de su ayuda. gracias.

[jbco]

Hola amancio, te dire:

error "800a0bb9"

La aplicación utiliza argumentos que no son del tipo correcto, que están fuera de intervalo aceptable o que son con alguno de otros.
/ ProjectName/Page.asp, línea X,
Esto es a menudo un error ADODB.Recordset.

Causa
Este problema se debe a menudo al código que utiliza constantes de ADO que no se han definido para la página. Por ejemplo:
<%
set cn=server.CreateObject("ADODB.Connection")
CN.Open "DSN=Gallery"
set rs=Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From Customers", CN, adOpenStatic, adLockOptimistic
%>
ASP no conoce intrínsecamente los valores de constantes de ADO y por lo tanto, las dos constantes (en el adOpenStatic y en el adLockOptimistic de escenario) están vacías.

Solución
Hay varias formas diferentes de que puede trabajar alrededor de este problema:
• Utilice los valores constantes reales:
<%
set cn=server.CreateObject("ADODB.Connection")
CN.Open "DSN=Gallery"
set rs=Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From Customers", CN, 3, 3
%>

• Establezca las constantes:
<%
Const adOpenStatic = 3
Const adLockOptimistic = 3
set cn=server.CreateObject("ADODB.Connection")
CN.Open "DSN=Gallery"
set rs=Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From Customers", CN, adOpenStatic, adLockOptimistic
%>


• Incluya el archivo Adovbs.inc con todas las constantes. Puede copiar el archivo Adovbs.inc de [drive] \Program files\Common files\System\ADO a su directorio de proyecto Web del servidor Web.
<!--#include file="adovbs.inc"-->
<%
set cn=server.CreateObject("ADODB.Connection")
CN.Open "DSN=Gallery"
set rs=Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From Customers", CN, adOpenStatic, adLockOptimistic
%>

• Si la página es parte de un proyecto que estuvo escrito en Microsoft Visual InterDev, puede configurar una referencia a las biblioteca de tipos ADO en el proyecto siguiendo estos pasos:
1. Abra el proyecto en Visual InterDev.
2. En el menú Proyecto en Visual InterDev, seleccione Project References.
3. En el cuadro de diálogo Referencias, seleccione Biblioteca de objetos de datos de Microsoft ActiveX y haga clic en Aceptar.

Saludos, espero te ayude en algo, avisa si lo pudiste solucionar.

[amancio]

Hola Jbco.

Muchas gracias pior tu ayuda

El probleme lo tenia en el adovbs.inc.

Ya solucione elproblema, gracias. bye.

[trasgukabi]

eso os pasa por usar el adovbs.inc. Aprendeos los valores de las constantes

[evoarte]

tambien hay que asegurarse de no haber cerrado previamente la conexión.



un saludo,
josé carlos.

[David]

Hola evoarte.

No sé si te fas fijado, pero el tema es de casi 3 años atrás .

[evoarte]

si, pero estaba teniendo un error igual, y no entendía por qué, bueno, pues tanto reutilizar código tiene eso, que no me había dado cuenta que estaba cerrando la conexión 2 líneas mas arriba,

noooooooo

el proximo/a que llegue a este post, tendrá una opción mas que descartar.

un saludo,
buenas noches,
josé carlos.