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

    Botão Salvar e Fechar

    samuelbpereira
    samuelbpereira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 38
    Registrado : 06/11/2011

    Botão Salvar e Fechar Empty Botão Salvar e Fechar

    Mensagem  samuelbpereira 3/1/2014, 14:43

    Boa tarde,

    No meu form tem o botão Salvar e Fechar, assim que o usuário clica no botão salvar há um log no rodapé com o nome, data e hora.
    O que está acontecendo, mudam as informações mas clicam direto em fechar, os dados são salvos mas não salva no log quem as fez.

    Há como fazer com que o botão fechar só apareça depois que o botão salvar for clicado ?

    Obrigado
    Uilson Brasil
    Uilson Brasil
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1039
    Registrado : 23/04/2013

    Botão Salvar e Fechar Empty Re: Botão Salvar e Fechar

    Mensagem  Uilson Brasil 3/1/2014, 17:43

    Samuel,

    Inative o botão fechar durante a edição do registro.


    Abraços,


    .................................................................................
    ::: Uilson Brasil
    ::: Design in Microsoft Access
    avatar
    halmeida
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 90
    Registrado : 07/08/2011

    Botão Salvar e Fechar Empty Re: Botão Salvar e Fechar

    Mensagem  halmeida 22/1/2014, 03:31

    No evento ao carregar insira:
    Código:
    me.botaosair.enable=false

    No evento ao clicar do botão salvar insira:
    Código:
    me.botaosair.enable=true

    Entretanto se o usuário precisar sair sem salvar os dados do formulario, é necessário liberar o botão salvar para uso.
    Desta forma você pode incluir no evento antes de atualizar:
    Código:
    Dim conf As Integer
    conf = MsgBox("Confirma alterações?", vbYesNo + vbQuestion, "Confirmar")
    If conf = vbNo Then
        Me.Undo
    end if

    Assim você pode deixar o botão sair sempre habilitado.
    Uilson Brasil
    Uilson Brasil
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1039
    Registrado : 23/04/2013

    Botão Salvar e Fechar Empty Re: Botão Salvar e Fechar

    Mensagem  Uilson Brasil 22/1/2014, 10:37

    Enabled


    .................................................................................
    ::: Uilson Brasil
    ::: Design in Microsoft Access
    avatar
    halmeida
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 90
    Registrado : 07/08/2011

    Botão Salvar e Fechar Empty Re: Botão Salvar e Fechar

    Mensagem  halmeida 22/1/2014, 11:10

    Corrigindo o código:
    No evento ao carregar:
    Código:
    me.botaosair.enabled=false

    No evento ao clicar no botão salvar:
    Código:
     me.botaosair.enabled=true

    Entretanto o código do evento antes de atualizar se encaixa melhor no que você quer fazer.
    Grato Uilson.

    Conteúdo patrocinado


    Botão Salvar e Fechar Empty Re: Botão Salvar e Fechar

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 23/11/2024, 07:10