[Resolvido]Mensagem Automática do Access

Galera

Me ajudem,
Tenho um formulário normal, com um controle de guia, com duas páginas, uma eu cadastro as respostas de um questionário de auditoria (pagina 1) e o outro eu consulto os registros num listbox (pagina 2).

Porém quando eu faço alterações na pagina de cadastro, utilizando o código abaixo:

Set dbs = CurrentDb
Set rsSQL = dbs.OpenRecordset("SELECT * FROM tb_Questionarios WHERE (((tb_Questionarios.ID)=" & Me.txt_ID.Value & "));") ', dbOpenSnapshot)

rsSQL.Edit
rsSQL("Data de Envio do Questionário") = Format(Me.txt_DataEnvio.Value, "m/d/yyyy")
rsSQL("Link do Questionário") = Me.txt_Link.Value
rsSQL("Questionário Fechado") = QFechado
rsSQL("Status do Questionário") = Me.txt_Status.Value
rsSQL("Situação do Questionário") = Me.txt_Situacao.Value
rsSQL("P1") = Me.cmb_P1.Value
rsSQL("Comentário P1") = Me.txt_ComentarioP1.Value
rsSQL("P2") = Me.cmb_P2.Value
rsSQL("Comentário P2") = Me.txt_ComentarioP2.Value
rsSQL("P3") = Me.cmb_P3.Value
rsSQL("Comentário P3") = Me.txt_ComentarioP3.Value
rsSQL("P4") = Me.cmb_P4.Value
rsSQL("Comentário P4") = Me.txt_ComentarioP4.Value
rsSQL("P5") = Me.cmb_P5.Value
rsSQL("Comentário P5") = Me.txt_ComentarioP5.Value
rsSQL("P6") = Me.cmb_P6.Value
rsSQL("Comentário P6") = Me.txt_ComentarioP6.Value
rsSQL("P7") = Me.cmb_P7.Value
rsSQL("Comentário P7") = Me.txt_ComentarioP7.Value
rsSQL("Comentários") = Me.txt_Comentarios.Value
rsSQL.Update

rsSQL.Close
Set rsSQL = Nothing

dbs.Close
Set dbs = Nothing

Quando removo a data por exemplo do campo e deixo vazio, e clico pra atualizar, o código executa normal, quando vou consultar na pagina 2 onde tem o listbox, o access me alerta:

"Os dados foram alterados."
"Outro usuário editou este registro e salvou as alterações antes de você."
"Reedite o registro."

O que eu faço pra solucionar,? tentei colocar "Me.Requery" após atualizar o form mas sem sucesso.

Bom dia!
Esse é um erro típico de concorrência de dados.
Ao que parece, na pagina 2 (ou na 1) há alguma
alteração de informação antes do update do recordset,
assim o Access avisa mesmo, pois não sabe qual das
informações são as que você gostaria de ter gravado.

Como não estamos com seu aplicativo aqui
para tentarmos entender a lógica, sugiro que revise
os códigos e veja se não há update no recordset antes
que outra instancia do recordset seja gravado.

Conseguii!!!

Estava atualizando o listbox ao editar o registro.
Removi o listbox.Requery após editar, está funcionando perfeito.

Excelente. Exatamente o que havia comentado. Parabéns por ter
encontrado o erro! Gratos por compartilhar a solução:D