[Resolvido]Formulário com auto numeração

Boa tarde!

Tenho um banco de dados que fiz a um tempo o qual tem bastante registros e não posso perder os mesmos.

Como posso fazer no formulário de registro para verificar qual foi o ultimo numero e somar +1 para continuar a sequancia?

desde já agradeço pela atenção.

Marcos

RS("SeuCampo") = DMax("Código", "SuaTabela") + 1

Estou supondo que está tentando fazer isso com um RecordSet. Se for tabela vinculada, e o campo form auto numeração, talvez terá que criar outra tabela com chave como número e importar os dados para ela.

Boa tarde!

Não tenho como modificar a tabela devido aos dados nela. Precisaria ver se existe a possibilidade de fazer no formulário (verificar qual foi o ultimo nº digitado e somar + 1)

Desde já agradeço pela atenção.

Marcos Volkweis

Esta alternativa somente funciona em formulários únicos no
Formulário principal.

- Abra o formulário no modo estrutura
- Selecione o campo chave primária da tabela em que o form se baseia
- Abra a janela de propriedades.
- Agora vá até a propriedade Valor padrão (aba Dados) e digite:

Nz(DMax("[Código do Cliente]"; "Cliente")) + 1

O Nz previne valores nulos. [Código do Cliente] é o nome do Campo Chave.
Clientes é o nome da Tabela.

A chave primária é auto numeração ou número normal? Você falou último número digitado, então presumo que seja número normal que pode ser digitado e inserido. Então a dica acima funcionaria. Agora, está trabalhando com forms vinculados ou não?

Mais dois posts quase simultâneos

Mais uma razão para usar o código acima já que não quer mexer na tabela

Vou testar o codigo depois post, o que aconteceu...

Muito obrigado

Marcos

Boa noite!

Vieira, você é bom funcionou direitinho, apenas troquei a "," (virgila) por ";" (ponto e virgula).

Você quebrou um baita galhão.

Muito obrigado.

Amigo, obrigado pelo retorno o fórum agradece e vou mudar essa vírgula (rsrsrs)

Abraço