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


2 participantes

    [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close

    avatar
    rgondim
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 229
    Registrado : 24/02/2012

    [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close Empty Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close

    Mensagem  rgondim 9/3/2012, 03:17

    Estou quebrando a cabeça para encontrar uma solução que envolve a impossibilidade de cancelar o evento AoClicar.

    Em um formulário inseri no evento AntesDeAtualizar, um comando para verificar preenchimento de alguns campos. Caso estejam preenchidos de maneira incorreta, uma mensagem informa o erro e cancela a atualização (com Cancel = True).

    Se o preenchimento estiver correto, então uma nova caixa de mensagem pergunta se desejo ou não salvar as alterações.

    SE ao tentar navegar entre os registros, clicar no botão salvar ou mesmo clicar no botão X para sair, Quando tento atualizar, houver erro do preenchimento, a atualização é cancelada e o procedimento que tentava fazer (mudar de registro, salvar ou sair do formulário é PARADO).

    O problema: quando clico no botão Fechar (DoCmd.Close), a mensagem de erro é apresentada, a digitação é desfeita, mas o formulário é fechado.

    Gostaria que ele não fechasse ao clicar em Fechar se houver erro de digitação.
    O precedimento está assim:

    Private Sub Form_BeforeUpdate(Cancel As Integer)

    Dim CxMsg As Integer

    If IsNull(Campo1) Or IsNull(Campo2) Or IsNull(Campo3) Or IsNull(Campo4) Then
    MsgBox "Campos obrigatórios podem estar vázios. Verifique para continuar.", _
    vbInformation, "Digitação Ausente ou Incompleta!"
    Cancel = True
    Else
    CxMsg = MsgBox("Deseja salvar as alterações?", vbYesNo + vbQuestion + vbDefaultButton1, "Salvar Alterações")
    If CxMsg = vbNo Then
    DoCmd.RunCommand acCmdUndo
    End If
    End If



    Última edição por rgondim em 9/3/2012, 13:19, editado 1 vez(es)
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3873
    Registrado : 21/04/2011

    [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close Empty Re: [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close

    Mensagem  Marcelo David 9/3/2012, 03:35

    Não compreendi o que pretendes..
    Qual o resultado final que você deseja obter?


    .................................................................................
    Aprenda como criar formulário desacoplado.
    Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close Marcel11
    avatar
    rgondim
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 229
    Registrado : 24/02/2012

    [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close Empty Re: [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close

    Mensagem  rgondim 9/3/2012, 13:23

    Marcelo,

    editei a postagem inicial. Estava muito confusa.
    Aguardo retorno.

    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3873
    Registrado : 21/04/2011

    [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close Empty Re: [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close

    Mensagem  Marcelo David 9/3/2012, 13:47

    Olá... Entendi...

    NO evento Ao descarregar

    Call Form_BeforeUpdate


    Veja se funciona.
    avatar
    Convidad
    Convidado


    [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close Empty Re: [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close

    Mensagem  Convidad 25/3/2012, 05:37


    ... Sem retorno do usuário ...
    avatar
    Convidad
    Convidado


    [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close Empty Re: [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close

    Mensagem  Convidad 12/4/2012, 03:01


    Considerado como resolvido.
    avatar
    rgondim
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 229
    Registrado : 24/02/2012

    [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close Empty Re: [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close

    Mensagem  rgondim 10/5/2012, 03:18

    Perdão por não ter retornado.
    Consegui com o comando no evento AoDescarregar!
    Obrigrado.

    Conteúdo patrocinado


    [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close Empty Re: [Resolvido]Verificação de Preenchimento, Confirmar Salvar: Problemas com o evento Close

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/5/2024, 17:43