Novo registro em ambiente multi usuários

Bom dia à todos,

Tenho um formulário que será operado por 4 usuários (Acesso_DTP) obviamente através de tabelas vinculadas.

Em testes com 2 usuários, ao clicar no botão Novo tanto o BD servidor quanto o BD do segundo computador abrem o mesmo registro.

Eu gostaria que, uma vez que eu abri um registro zerado no meu computador, o outro usuário, ao clicar no botão Novo abra um segundo novo registro.

Como posso proceder?

O código do botão esta assim:

Private Sub Novo_Click()

DoCmd.GoToRecord , , acNewRec
DoCmd.Save acForm, "Acesso_DTP"
Me.Foto.SetFocus
End Sub


Já grato pela atenção de todos

pego essa carona.

Boa tarde,

mduarteteixeira escreveu:Em testes com 2 usuários, ao clicar no botão Novo tanto o BD servidor quanto o BD do segundo computador abrem o mesmo registro.

Se você está adicionando registro não está abrindo... Pode explicar melhor o que está acontecendo?

Código:

DoCmd.GoToRecord , , acNewRec
DoCmd.Save acForm, "Acesso_DTP"
Me.Foto.SetFocus

DoCmd.Save acForm, "Acesso_DTP", essa linha salva o objeto formulário Acesso_DTP, mas ele já está salvo e é desnecessário (pode até trazer problemas em ambiente runtime).

Boa tarde e desculpe a demora a resposta.

O BD está atualmente rodando em 5 computadores. Em todos, o formulário principal executa o seguinte comando:

Private Sub Form_Load()

Call AccessTransparente(0)
DoCmd.GoToRecord , , acNewRec
Me.Foto.SetFocus

Ou seja, todos os computadores estão acessando o mesmo novo registro. Se um usuário começa a lançar dados ao mesmo tempo que outro, dá conflito e gera a msg de erro do access.

Se eu tirar do evento o DoCmd.GoToRecord, , acNewRec, o formulário mostrará obviamente o primeiro registro existente.

O que eu busco é o seguinte:

Toda vez que os usuários abrirem o form, apareça tudo em branco.

Cada usuário que clicar no botão Novo, gere um novo registro em branco na tabela, ou seja, 3 usuários clicam em novo, 3 linhas novas surjam na tabela.

Infelizmente, a chave primária da tabela é somente o campo Código.

Estava pensando em, ao carregar, tornar tudo Me.Campo.Locked = True, menos o botão Novo. Criar um campo oculto de índice exclusivo e incrementar 1 cada vez que for clicado no botão Novo.

O duro é que o BD já está em operação há alguns dias.

Limpei bem o BD para anexar aqui como exemplo


Obrigado!