abrir 2 recordsets de 2 tablas distintas

Hola amigos, necesito abrir 2 recordset de 2 tablas distintas en la misma
pagina.
Lo que se me ocurrió, que no sé si esta bien esto:

idrubro = trim(request("idrubro"))

set rsproductos = server.CreateObject("adodb.recordset")
rsproductos.activeconnection = conexion
csql = "SELECT * FROM productos WHERE rubro = '"&idrubro&"'"
rsproductos.open csql

set rsrubro = server.CreateObject("adodb.recordset")
rsrubro.activeconnection = conexion
csql2 = "SELECT * FROM rubros WHERE idrubro = '"&idrubro&"'"
rsrubro.open csql2

No anda ni para atrás, me tira el siguiente mensaje:
Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01A8)
Se requiere un objeto: 'conexion'
/cosas/lista-productos-rubros-proceso.asp, línea 6

A qie se puede deber?
gracias
nacho

Es que le dices
rsproductos.activeconnection = conexion
Y no pareces declararla no abrirla nunca...

Prueba algo así:

strProvider = cadena de conexion...
Set conexion= Server.CreateObject("ADODB.Connection")
Set rsproductos = Server.CreateObject("ADODB.Recordset")
Set rsrubro = Server.CreateObject("ADODB.Recordset")
conexion.Open strProvider
csql= "SELECT * FROM productos WHERE rubro = '"&idrubro&"'"
rsproductos.Open csql, conexion, 3,1
csql2 = "SELECT * FROM rubros WHERE idrubro = '"&idrubro&"'"
rsrubro.open csql2, conexion, 3,1


Sashka
MS MVP Access
MCP ASP.Net

"nacho" escribió en el mensaje
news:
> Hola amigos, necesito abrir 2 recordset de 2 tablas distintas en la

> pagina.
> Lo que se me ocurrió, que no sé si esta bien esto:
>
> idrubro = trim(request("idrubro"))
>
> set rsproductos = server.CreateObject("adodb.recordset")
> rsproductos.activeconnection = conexion
> csql = "SELECT * FROM productos WHERE rubro = '"&idrubro&"'"
> rsproductos.open csql
>
> set rsrubro = server.CreateObject("adodb.recordset")
> rsrubro.activeconnection = conexion
> csql2 = "SELECT * FROM rubros WHERE idrubro = '"&idrubro&"'"
> rsrubro.open csql2
>
> No anda ni para atrás, me tira el siguiente mensaje:
> Tipo de error:
> Error de Microsoft VBScript en tiempo de ejecución (0x800A01A8)
> Se requiere un objeto: 'conexion'
> /cosas/lista-productos-rubros-proceso.asp, línea 6
>
> A qie se puede deber?
> gracias
> nacho
>
>
>