Tabla temporal y error de conexión

29/11/2003 - 02:14 por Ana Sofia Rios | Informe spam
Hola! Espero que alguien me pueda ayudar.

Estoy haciendo una consulta para la cual necesito crear una tabla
temporal. Cuando corro el query que me devuelve el navegador en el
"Query Analizer" todo funciona a la perfección y me devuelve como 100
registros, pero cuando lo quiero ejecutar desde web me marca el error
800a0e78 y me dice que no puedo utilizar el objeto sin antes
abrirlo...¡pero sí está abierto!...¿alguna idea de por qué pasa esto?

Aquí les mando el código que causa el problema por si me pueden hacer
alguna sugerencia:

Cnx = Session("cnv")
Set rs = Server.CreateObject("ADODB.Recordset")

Sql = ""
Sql = Sql & " SELECT envio.id_sucursal, "
Sql = Sql & " envio.fechayhora, "
Sql = Sql & " envio.id_sucursal1, "
Sql = Sql & " envio.paquete, "
Sql = Sql & " recibo.paquete as paq_recibo "
Sql = Sql & " INTO #PASO "
Sql = Sql & " FROM actividad as envio LEFT JOIN actividad as recibo "
Sql = Sql & " ON envio.id_sucursal1 = recibo.id_sucursal "
Sql = Sql & " and envio.id_sucursal = recibo.id_sucursal1 "
Sql = Sql & " and envio.paquete = recibo.paquete "
Sql = Sql & " and recibo.tipo = 'recibo' "
Sql = Sql & " WHERE envio.id_sucursal ='cedis trc' "
Sql = Sql & " and envio.tipo ='envio' "
Sql = Sql & " and envio.fechayhora <= ' " & fecha1 & "' "
Sql = Sql & " and envio.fechayhora >= ' " & fecha3 & "' "
Sql = Sql & " GROUP BY envio.fechayhora, envio.id_sucursal1,
envio.id_sucursal, envio.paquete, recibo.paquete "
Sql = Sql & " ORDER BY envio.id_sucursal1, envio.paquete "

Sql = Sql & " "
Sql = Sql & " SELECT * "
Sql = Sql & " FROM #PASO "
Sql = Sql & " WHERE paq_recibo is NULL "

rs.Open Sql, Cnx

'AQUI MARCA EL ERROR
IF (rs.EOF AND rs.BOF) THEN

Response.Write "No se encontraron registros"

ELSE
...


Gracias y saludos!
 

Leer las respuestas

#1 Manuel Etcheto
29/11/2003 - 04:29 | Informe spam
Hola
Te falta SET NOCOUNT ON para que tu Rs reciba el conjunto
de registros del último select, y no el mensaje anterior
de xxx filas afectadas por el insert.

Suerte
Manuel


Hola! Espero que alguien me pueda ayudar.

Estoy haciendo una consulta para la cual necesito crear


una tabla
temporal. Cuando corro el query que me devuelve el


navegador en el
"Query Analizer" todo funciona a la perfección y me


devuelve como 100
registros, pero cuando lo quiero ejecutar desde web me


marca el error
800a0e78 y me dice que no puedo utilizar el objeto sin


antes
abrirlo...¡pero sí está abierto!...¿alguna idea de por


qué pasa esto?

Aquí les mando el código que causa el problema por si me


pueden hacer
alguna sugerencia:

Cnx = Session("cnv")
Set rs = Server.CreateObject("ADODB.Recordset")

Sql = ""
Sql = Sql & " SELECT envio.id_sucursal, "
Sql = Sql & " envio.fechayhora, "
Sql = Sql & " envio.id_sucursal1, "
Sql = Sql & " envio.paquete, "
Sql = Sql & " recibo.paquete as paq_recibo "
Sql = Sql & " INTO #PASO "
Sql = Sql & " FROM actividad as envio LEFT JOIN actividad


as recibo "
Sql = Sql & " ON envio.id_sucursal1 = recibo.id_sucursal "
Sql = Sql & " and envio.id_sucursal =


recibo.id_sucursal1 "
Sql = Sql & " and envio.paquete = recibo.paquete "
Sql = Sql & " and recibo.tipo = 'recibo' "
Sql = Sql & " WHERE envio.id_sucursal ='cedis trc' "
Sql = Sql & " and envio.tipo ='envio' "
Sql = Sql & " and envio.fechayhora <= ' " & fecha1 & "' "
Sql = Sql & " and envio.fechayhora >= ' " & fecha3 & "' "
Sql = Sql & " GROUP BY envio.fechayhora,


envio.id_sucursal1,
envio.id_sucursal, envio.paquete, recibo.paquete "
Sql = Sql & " ORDER BY envio.id_sucursal1, envio.paquete "

Sql = Sql & " "
Sql = Sql & " SELECT * "
Sql = Sql & " FROM #PASO "
Sql = Sql & " WHERE paq_recibo is NULL "

rs.Open Sql, Cnx

'AQUI MARCA EL ERROR
IF (rs.EOF AND rs.BOF) THEN

Response.Write "No se encontraron registros"

ELSE



Gracias y saludos!

.

Preguntas similares