Error 80004005

Asi como asi, no le veo nada.

Pero, porque, en vez de generar un tipo recordset, no ejecutas la consulta
directamente.

He visto muchos problemas con el objeto recordset, que se solucionan,
simplemente, no usandolos.

La cosa quedaria mas o menos asi:

> ' definición de la conexión
> Set conn = Server.CreateObject("ADODB.Connection") 'crear objeto para
> conexión
> conn.Mode = 3
> conn.provider="Microsoft.Jet.OLEDB.4.0" 'definir proveedor de
> conexión
> conn.Open (server.mappath("Aplicaciones.mdb")) 'abrir base de datos
> ...

> If Not IsNull(Request.QueryString("ID"))then
> strSQL = "SELECT Codigo, Tag, Descriptor " _
> & "FROM qryTagsDescriptor " _
> & "WHERE Codigo='" + Request.QueryString("ID") & "' " _
> & "ORDER BY Tag"
> response.Write(strSQL)
set rstTags = conn.execute(strSQL)

> End If


Saludos,


Matías Iacono
Microsoft MVP ASP/ASP.net - DCE3

Profile: http://aspnet2.com/mvp.ashx?MatiasIacono
"Emilio" <miliuco56 ARROBA hotmail.com> escribió en el mensaje
news:
> Hola a ,
> ya sé que este es un error bastante común y he encontrado en google 267
> mensajes al respecto, pero creo que ninguno como el mío, así que me temo
> que
> es un error "comodin", lo que me ocurre es lo siguiente
>
> tengo una asp atacando a una base de datos, nada complicado, en

> funciona bien hasta que decido cambiar un recordset que trae dos campos

> una tabla, uno de ellos es el clave, al añadir un tercer campo

> de otra tabla, para lo cual llamo a una consulta en vez de a una tabla,
>
> mi código es el siguiente
>
> ...
> ' definición de la conexión
> Set conn = Server.CreateObject("ADODB.Connection") 'crear objeto para
> conexión
> conn.Mode = 3
> conn.provider="Microsoft.Jet.OLEDB.4.0" 'definir proveedor de
> conexión
> conn.Open (server.mappath("Aplicaciones.mdb")) 'abrir base de datos
> ...
> Set rstTags = Server.CreateObject("ADODB.Recordset")
> If Not IsNull(Request.QueryString("ID"))then
> strSQL = "SELECT Codigo, Tag, Descriptor " _
> & "FROM qryTagsDescriptor " _
> & "WHERE Codigo='" + Request.QueryString("ID") & "' " _
> & "ORDER BY Tag"
> response.Write(strSQL)
> rstTags.Open strSQL, conn
> End If
> ...
>
> desde el momento en que hago el cambio me produce el siguiente error
>
> SELECT Codigo, Tag, Descriptor FROM qryTagsDescriptor WHERE

> ORDER BY Tag error '80004005'
> Unspecified error
>
> /proyecto pi/basedatos/Aplicaciones/ayuda.asp, line 36
>
> y si lo deshago, vuelve a funcionar correctamente.
> Repito que mientras trabajaba contra una tabla, en vez de contra una
> consulta, todo iba bien, por supuesto la select es correcta y se ejecuta
> sin
> problemas en la base de datos.
>
> ¿Alguna idea para sacarme del atasco?
>
> Muchisimas gracias a
>
> Saludos
> Emilio
> miliuco56 ALGARROBA hotmail.com
> http://www.mvp-access.com/foro
> http://www.mvp-access.com/emilio
>
>
>