Visual Basic - USRA 2 O MAS RECORDSETS EN UNA APLICACION

HOLA QUE TAL.

ME GUSTARIA SABER SI HAY UNA FORMA DE USAR 2 O MAS RECORDSETS EN UNA APLICACION, SI ALGUIEN ME PUDIERA DAR UN EJEMPLO O DE DONDE PUEDO VER EJEMPLOS

GLOBAL CTE.ADODB 'RECORDSET DE CLIENTES
GLOBAL PRO.ADODB 'RECORDSET DE PROVEEDORES
GLOBAL VTA.ADODB 'RECORDSET DE VENTAS

ETC.

Principiante:
Usá la cantidad de Recordsets que necesites. Dale distintos nombres y listo. Antes que nada Global es una instrucción heredade de Visual Basic 3. Microsoft sacó un artículo que indica porque no debe serguir usándose Global (es del 95 o 96, cuando lo encuentre te lo mando). No es que no funcione, pero a veces falla y aparecen errores aparentemente "inexplicables". No la utilices más. Usá public para las variables visibles a todo el proyecto, private para aquello que es visible dentro de un módulo (formulacio, clase, módulo, etc) y Dim para lo que es visible dentro de un procedimiento, función o propiedad (así aconseja Microsoft desde que salio VB5).

Podés utilizar algo por el estilo
Public DB as database, rdsClientes as Recordset, rdsProveedores as recordset, rdsVentas as Recordset
'Vos completá con los parámetros que necesités
Set db=OpenDatabase("C:\xxx.mdb")
set rdsClientes = db.Openrecordset("tblClientes")
set rdsProveedores = db.Openrecordset("tblProveedores")
set rdsVentas = db.Openrecordset("tblVentas")
'Luego usá cada uno por separado y listo

....
'Antes de cerrar la aplicación cerrá los objetos abiertos
rdsClientes.Close
rdsProveedores.Close
rdsVentas.Close
set db.close
set rdsClientes = Nothing
set rdsProveedores = Nothing
set rdsVentas = Nothing
set db=nothing

Saludos Ruri

MUCHAS GRACIAS RURI, TU EJEMPLO ME SIRVIO MUCHO
SALUDOS DESDE MEXICO