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


    Como pedir confirmação caso um dado seja alterado

    avatar
    Vanderlei
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 162
    Registrado : 20/01/2011

    Como pedir confirmação caso um dado seja alterado Empty Como pedir confirmação caso um dado seja alterado

    Mensagem  Vanderlei 20/10/2020, 11:29

    Olá

    Gostaria de, caso dados de um campo for alterado, solicitar confirmação, caso negativo retorna o dado anterior

    Grato
    alozs
    alozs
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 292
    Registrado : 07/02/2018

    Como pedir confirmação caso um dado seja alterado Empty Re: Como pedir confirmação caso um dado seja alterado

    Mensagem  alozs 20/10/2020, 13:32

    Já tentou incluir uma trava no evento "antes de atualizar" do form?
    avatar
    Vanderlei
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 162
    Registrado : 20/01/2011

    Como pedir confirmação caso um dado seja alterado Empty Re: Como pedir confirmação caso um dado seja alterado

    Mensagem  Vanderlei 20/10/2020, 17:32

    Então, é justamente isso que não sei como fazer!!!
    Silvio
    Silvio
    Developer
    Developer

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4740
    Registrado : 20/04/2011

    Como pedir confirmação caso um dado seja alterado Empty Re: Como pedir confirmação caso um dado seja alterado

    Mensagem  Silvio 20/10/2020, 17:42

    No evento ao sair da caixa de texto...algo parecido com isso.

    If MsgBox("Confirma a alteração de dados", vbQuestion + vbYesNo, " A V I S O ") = vbNo Then
    Me.Undo
    DoCmd.CancelEvent
    Else
    Exit Sub
    End If



    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    avatar
    Vanderlei
    Intermediário
    Intermediário

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 162
    Registrado : 20/01/2011

    Como pedir confirmação caso um dado seja alterado Empty Re: Como pedir confirmação caso um dado seja alterado

    Mensagem  Vanderlei 20/10/2020, 19:17

    Olá
    Obrigado pelo empenho

    Resolve em parte, o código funciona, mas quando o campo é digitado pela primeira vez, ele também pergunta.
    A intenção seria perguntar somente quando houvesse uma alteração num campo já preenchido ateriormente
    alozs
    alozs
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 292
    Registrado : 07/02/2018

    Como pedir confirmação caso um dado seja alterado Empty Re: Como pedir confirmação caso um dado seja alterado

    Mensagem  alozs 20/10/2020, 19:52

    basta acrescentar um

    if isnull(me.nomedocampo) then exit sub 'se o campo for nulo ele não faz o processo abaixo

    If MsgBox("Confirma a alteração de dados", vbQuestion + vbYesNo, " A V I S O ") = vbNo Then
    Me.Undo
    DoCmd.CancelEvent
    Else
    Exit Sub
    End If

    end if

    Conteúdo patrocinado

    Como pedir confirmação caso um dado seja alterado Empty Re: Como pedir confirmação caso um dado seja alterado

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 18/5/2021, 06:49