MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


3 participantes

    [Resolvido]Como salvar o ID somente quando clicar no Botão.

    abjinfo
    abjinfo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 145
    Registrado : 02/07/2015

    [Resolvido]Como salvar o ID somente quando clicar no Botão. Empty [Resolvido]Como salvar o ID somente quando clicar no Botão.

    Mensagem  abjinfo 17/10/2024, 19:08

    Olá pessoal do fórum!

    Venho aqui pedir ajuda dos Mestres.

    Tenho um Formulário de cadastro que uso ID como código de controle de Pasta e um dos campos não permite duplicidade.

    Até ai tudo bem.

    Agora o problema:

    Quando o campo informa a duplicidade o usuário sai do formulário, só que o ID foi gerado.

    Tem algum código que posso colocar no Botão sair que não deixa gravar ou gerar o código ID?

    Obs.: O Formulário é acoplado na Tabela.

    Fico no aguardo, obrigado.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3501
    Registrado : 13/12/2016

    [Resolvido]Como salvar o ID somente quando clicar no Botão. Empty Re: [Resolvido]Como salvar o ID somente quando clicar no Botão.

    Mensagem  Alexandre Fim 17/10/2024, 19:58

    Olá Alexandre,


    Este ID é algum campo na tabela com Numeração Automática?
    Se for, quando o usuário começa a digitar dados no form, o Access gera o ID automaticamente, e caso o registro não seja gravado, este ID não será mais utilizado, garantindo a integridade do registro.

    Compartilhe uma cópia do seu bd, somente objetos (tabelas/consultas/formulários/modulos e etc.) pertinentes ao problema, para análise e solução.

    Att

    Alexandre Fim


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Como salvar o ID somente quando clicar no Botão. Setinf11
    Sistemas e Tecnologia Ltda
    abjinfo
    abjinfo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 145
    Registrado : 02/07/2015

    [Resolvido]Como salvar o ID somente quando clicar no Botão. Empty Re: [Resolvido]Como salvar o ID somente quando clicar no Botão.

    Mensagem  abjinfo 17/10/2024, 20:12

    Opa...

    Obrigado em responder.

    Sim.. é um campo de Numeração Automática,

    Ai que está o problema.

    Não queria perder a ordem desta numeração por segurança da informação.

    Vou preparar o DB e te mando.

    Obrigado.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3501
    Registrado : 13/12/2016

    [Resolvido]Como salvar o ID somente quando clicar no Botão. Empty Re: [Resolvido]Como salvar o ID somente quando clicar no Botão.

    Mensagem  Alexandre Fim 17/10/2024, 20:53

    Olá,

    Infelizmente, não tem como "aproveitar" esta numeração porque é a característica deste campo, que é muito utilizado como chave primária também.

    Aguardo envio do banco de dados.

    Att,

    Alexandre Fim


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Como salvar o ID somente quando clicar no Botão. Setinf11
    Sistemas e Tecnologia Ltda
    abjinfo
    abjinfo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 145
    Registrado : 02/07/2015

    [Resolvido]Como salvar o ID somente quando clicar no Botão. Empty Re: [Resolvido]Como salvar o ID somente quando clicar no Botão.

    Mensagem  abjinfo 18/10/2024, 14:49

    Opa Alexandre!

    Sim... eu imaginei por ser chave primária.

    Se tivesse um jeito de criar um campo na tabela com o nome Pasta e copiasse número do registro anterior+1.

    Não sei se estou explicando direito.

    O DB original já tem 2300 cadastros.

    Estou disponibilizando o DB teste.
    Anexos
    [Resolvido]Como salvar o ID somente quando clicar no Botão. AttachmentDB.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (93 Kb) Baixado 6 vez(es)
    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1042
    Registrado : 23/08/2010

    [Resolvido]Como salvar o ID somente quando clicar no Botão. Empty Re: [Resolvido]Como salvar o ID somente quando clicar no Botão.

    Mensagem  Mylton 20/10/2024, 17:08

    Apenas dando um pitaco
    Adapte e Teste

    Private Sub Form_BeforeInsert(Cancel As Integer)
    Dim rs As DAO.Recordset
    Dim novoNumero As Long

    ' Abra a tabela onde o campo de chave primária está
    Set rs = CurrentDb.OpenRecordset("SELECT MAX([ID]) AS UltimoNumero FROM tblNomeDaTabela")

    ' Verifique se há registros na tabela
    If Not rs.EOF Then
    ' Obtenha o último número e incremente em 1
    novoNumero = Nz(rs!UltimoNumero, 0) + 1
    Else
    ' Se não houver registros, comece a partir de 1
    novoNumero = 1
    End If

    ' Feche o recordset
    rs.Close
    Set rs = Nothing

    ' Atribua o valor incrementado ao campo de chave primária
    Me![ID] = novoNumero
    End Sub



    • MAX([ID]): Esta função encontra o valor mais alto já utilizado no campo de chave primária “ID”. Substitua [ID] pelo nome do campo de chave primária da sua tabela.
    • tblNomeDaTabela: Substitua pelo nome da sua tabela.
    • Nz(rs!UltimoNumero, 0): A função Nz garante que, se não houver registros na tabela, o valor padrão será 0. Assim, o primeiro número gerado será 1.
    • Me![ID]: Atribui o novo número ao campo “ID” no formulário.
    abjinfo
    abjinfo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 145
    Registrado : 02/07/2015

    [Resolvido]Como salvar o ID somente quando clicar no Botão. Empty Re: [Resolvido]Como salvar o ID somente quando clicar no Botão.

    Mensagem  abjinfo 21/10/2024, 15:20

    Olá Mylton!

    Eu imaginei que teria uma solução, porem não saberia como fazer.

    Muito obrigado pelo retorno e atenção.

    Está funcionando perfeitamente.
    Mylton
    Mylton
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1042
    Registrado : 23/08/2010

    [Resolvido]Como salvar o ID somente quando clicar no Botão. Empty Re: [Resolvido]Como salvar o ID somente quando clicar no Botão.

    Mensagem  Mylton 21/10/2024, 20:05

    Nós é que agradecemos.
    Abs

    Conteúdo patrocinado


    [Resolvido]Como salvar o ID somente quando clicar no Botão. Empty Re: [Resolvido]Como salvar o ID somente quando clicar no Botão.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 6/12/2024, 17:48