Pessoal,

Tenha uma tela no meu sistema em access2000 que entra em loop ás vezes, não estou conseguindo identificar o problema, pois ocorre de vez em quando travando meu sistema e me obrigando a sair pelo CTRL+ALT+DEL.

Rotina do botão: quando clico no botão "atualizar" esta rotina abaixo pede pra carregar novamente a pesquisa que fiz (Select)

Dim TbEstoq As DAO.Recordset

Set TbEstoq = Forms![Consulta]![Sub Consulta].Form.RecordsetClone
If TbEstoq.RecordCount > 0 Then
TbEstoq.MoveFirst
Do Until TbEstoq.EOF
TbEstoq.Edit
TbEstoq!Conciliado = False
TbEstoq.Update
TbEstoq.MoveNext
Loop
End If
TbEstoq.Close
Me![Sub Consulta Estoque].Form.Requery

Valew Avelino... já ajudou bastante...
Usando o tratamento de erro a rotina num trava mais, mas também num funciona...

Por que será que o recordset funciona apenas no primeira vez qeu executa... quando mando executar novamente (sem sair da tela) o recordsetclone num funciona mais... muito estranho.

Tentei também cara..
Acho que vou tirar o Recordsetclone da jogada, aí resolve ... preciso testar !