[Resolvido]Setar RecordSet várias vezes antes de fechá-lo

Boa tarde companheiros!
Gostaria de esclarecer uma dúvida que tenho a algum tempo:

Quando preciso me referir a algum recordset em um banco desvinculado, custumo usar o seguinte:

Set rs = DBEngine.Workspaces(0).OpenDatabase(CaminhoDobanco+Banco, False, False, "MS Access;PWD="1234").OpenRecordset(Tabela1)

Atualiza, adiciono, excluo...

'Fecho o banco e saio imediatamente do rs...

rs.Close
Set rs = Nothing

Ok, sem problema algum!

Minha dúvida está no seguinte:

Caso em uma função, eu precise fazer alterações em registros de tabelas diferentes, posso fazer como abaixo?

Set rs = DBEngine.Workspaces(0).OpenDatabase(CaminhoDobanco+Banco, False, False, "MS Access;PWD="1234").OpenRecordset(Tabela1)

Atualiza, adiciono, excluo...

Set rs = DBEngine.Workspaces(0).OpenDatabase(CaminhoDobanco+Banco, False, False, "MS Access;PWD="1234").OpenRecordset(Tabela2)

Atualiza, adiciono, excluo...


Set rs = DBEngine.Workspaces(0).OpenDatabase(CaminhoDobanco+Banco, False, False, "MS Access;PWD="1234").OpenRecordset(Tabela3)

Atualiza, adiciono, excluo...


'Observe que somente após fazer todas as operações nas diferentes tabelas acima é que eu saí do RecordSet e fechei o banco

rs.Close
Set rs = Nothing


Então, amigos. posso fazer assim?
Minha dúvida é porque eu não costumo abrir o banco separado do recordset e sim já junto (como poderam cer acima). Sendo assim, não preciso sair do banco e depois do rs. Pois dessa forma, saio de uma só vez tanto do banco como do rs.

Em testes, pensei que o RecordSet uma vez setado para uma tabela/Query e após sem fechá-lo, setar para outra tabela/Query, daria algum erro. Mas não deu, funciona certinho...
Mas tenho medo dessa maneira causar algum problema futuro com o banco, como o corrompimento...

Grato pelos esclarecimentos.

O Recordset é como uma variável..

A questão de fechar.. e para aliviar a conexão com o banco de dados..
Creio que enquanto está executando o código não é necessário fechá-lo e reabri-lo..

Creio eu.

Enquanto uma ação não depender da outra, não tem problemas em apenas mudar o destino da variável. Agora há momentos em que precisamos usar dois recordsets ou mais ao mesmo tempo. Por exemplo:

Código:

Set rs1 = DBEngine.Workspaces(0).OpenDatabase(CaminhoDobanco+Banco, False, False, "MS Access;PWD="1234").OpenRecordset(Tabela1)

Set rs2 = DBEngine.Workspaces(0).OpenDatabase(CaminhoDobanco+Banco, False, False, "MS Access;PWD="1234").OpenRecordset("SELECT Nome FROM Tabela2 WHERE Código=" & rs1!Código & "")

Aí será necessário abrir os dois recordsets e depois fechar os dois.

Perfeito amigos! criquio e piloto, ótimo pelos esclarecimentos.
me dou por satisfeito!

Grato!

Grato pelo retorno. O fórum agradece.