Duvida com OpenRecordset.

Saudações.

Tenho uma duvida com OpenRecordset.

Tenho uma rotina que após fazer a conexão com a base de dados.

Tem uma rotina que determina a ordem do dados.

Call CarregarDados("nmArea")

Em outra ordem eu chamo:

Call CarregarDados("idArea")


Duvida:
Posso chamar a rotina toda vez que eu queira mudar a ordem?
Tenho que fechar o OpenRecordset e abrir com outra Ordem (ORDER )?
Correto este procedimento?



Private Sub CarregarDados(Ordem)

Dim sSQL As String

sSQL = "SELECT idArea, sgArea, nmArea FROM tabArea ORDER BY " & Ordem

Set rstArea = dbsBD.OpenRecordset(sSQL, dbOpenDynaset)

End Sub

Obrigado.

Toninho bom dia,

Sim. Correto
Toda vez que utilizar recordset, após seu uso, tem que fechar e limpar da memória. Desta forma:

Private Sub CarregarDados(Ordem)

Dim sSQL As String

sSQL = "SELECT idArea, sgArea, nmArea FROM tabArea ORDER BY " & Ordem

Set rstArea = dbsBD.OpenRecordset(sSQL, dbOpenDynaset)
'-- rotina para carregar dados..
' ...
' ...


rstArea.Close
Set rstArea = Nothinhg


End Sub


É isso.
Espero ter ajudado.

Att,

FIM