Retornar o valor do ID, via código
Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 10x no Cartão de Crédito.
Veja como comprar e saiba mais sobre o material oferecido, clicando aqui.
Usuário José:
Tenho um formulário para inserir dados em uma tabela não acoplada. Gostaria que retornasse o número do id_cadastro, assim que confirmasse a gravação. A gravação será via código.
...
rs!nome = me!nome
rs!dh_nascimento = me!dh_nascimento
...
Depois de inserir os dados, ele me retorna o número do id_cadastro (tipo: autonumeração) da respectiva tabela.
Suporte:
José, assim que você utiliza o comando AddNew, você tem o ID
(autonumeração) à sua disposição.
Exemplo:
Dim id&
...
Set rs = CurrentDb.OpenRecordset("tblClientes")
rs.AddNew
id = rs!idCliente 'captura o número exclusivo(autonumeração) do novo registro
rs!cli_Nome = Me!tx1
rs.Update
...
Usuário José:
Deu certo!
Muito bom!
| Não há comentário |
