Visual Basic - ADODB.Command

Estimados amigos,

tengo un Modulo que se llama rutinasgenerales y en la primera parte donde dice general grabe esto hace tiempos

Public cmd As ADODB.Command
Public Cnn As ADODB.Connection
Public rs0 As ADODB.Recordset
Public rs1 As ADODB.Recordset
Public rs2 As ADODB.Recordset
Public vBookmark As Variant

esas lineas de arriba en azul, no se como se ejecutan, pero a de ser automatico, pues yo no las mando a ejecutar. ?

Luego en cada formulario, yo tenia esto.

Set Cnn = New ADODB.Connection
Set cmd = New ADODB.Command 'las dio jim
Cnn.CursorLocation = adUseClient
Cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & sbase

pero como estoy normalizando mi proyecto, para que no consuma tantos recursos,
hoy en la tarde movi esas instrucciones de arriba en rojo. a una sola parte del proyecto al formulario
que se llama menu general, pues desde alli parto para todos los formularios.

La pregunta, es esta ? esta buena esa Jugada que Hize, o no es asi que debo de organizar esto ?

Bueno para concluir, abro la tablas de esta manera .

rs0.Open "Select * from pdam1001 where Cuenta='" & Text1.Text & "'", Cnn, adOpenDynamic, adLockPessimistic

todo me esta funcionando ! pero deseo que esto funcione lo mejor posible !
se supone que este proyecto es multiusuario, o sea que voy a tener 3 o 5 personas, accesando la
misma opcion de grabar datos, en diferentes pantallas, con windows NT o 2000 mas access2000

alguna intruccion que me puedan dar ?

saludos,

José

Hola. En tu caso yo declararía, únicamente, un objeto connection.
Cada vez que necesitara utilizar un Recordset lo crearía, lo utilizaría y lo cerraría. La conexión sólo la tendría abierta cuando la necesitara y la cerraría si no la necesitara.
Esto te ahorrará problemas multiusuario.
Un saludo.