Contador Personalizado

[ASilva]

Pessoal,

Estou utilizando um contador automatico em um campo (ex: xxxx/xxxx ou 0001/2009) com a seguinte linha de código no campo valor padrão da caixa texto no formulário:

=SeImed(DContar("[Nome do Campo]";"Nome da Tabela")=0;("001" & Ano(Data()));Formato((Esquerda(DMáx("[Nome do Campo]";"Nome da Tabela");3)+1) & Ano(Data());"000\/0000"))

Esse código esta funcinando perfeitamente no banco de dados local... só que preciso utilizar o banco em rede. Quando 2 ou mais usuários acrescentam novos registros no banco, não acompanha o contador na tabela, fazendo a contagem no formulário de cada usuário, exemplo:

Cod_Autonumeração Numero_ocorrencia(campo contador automatico) Usuário

1 0001/2009 A

2 0001/2009 B

E assim por diante.

Lembro que localmente esse código funciona com contagem sequente.

Como fazer esse código funcionar em rede? Ou outro exemplo, forma que possa ser adaptado.

Desde agradeço pela atenção.

Abraços

ASilva

Editado Março 15, 2009 por ASilva

[MrMALJ]

Nesse caso crie um borão para gerar o codigo antes de iniciar ou após acabar a digitação do registro. Esse botão executará o procedimento para gerar o numero e irá salvar o registro na tabela, assim outro usuario na rede não pegara o mesmo numero.

[ASilva]

Caro MrMALJ,

Ainda sou leigo nos códigos do access e vou precisar de mais uma ajuda...

No formulário tem um botão de NOVO REGISTRO, que por sua vez possui algumas funções no evento ao abrir.

Esse código seria colocado no mesmo evento (ao abrir) desse botão ou em outro evento do formulário?

Como atribuir (gerar) esse código no formato VBA?

Grato,

ASilva

Editado Março 16, 2009 por ASilva