MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    Registrando alterações no form apenas se atualizar algum campo

    Compartilhe

    Ismaelsousa
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 11/02/2016

    Registrando alterações no form apenas se atualizar algum campo

    Mensagem  Ismaelsousa em Seg 14 Maio 2018, 12:21

    Bom dia.

    Tenho um formulário com uma combinação que atualiza o subformulario. No subformulario eu tenho vários campos e trabalho com esse modulo para registrar alterações

    Public Function RegistaAlteracoes(frm As Form, Optional bHasInactive As Boolean = False) As Boolean

       Dim strForm As String
       Dim strUser As String
       Dim strIP As String
       Dim strUserLog As String
       
       strForm = frm.Name
       strUser = GetUserName_TSB
       strIP = DameIpMaquina()
       strUserLog = DLookup("strUserID", "qryUserLogado", "strUserID")
       If frm.NewRecord Then
           frm!DataRegisto = Now()
           frm!UserRegisto = strUser
           frm!IPRegisto = strIP
           frm!UserRegistoLog = strUserLog
       Else
           frm!DataModificacao = Now()
           frm!UserModificacao = strUser
           frm!IPModificacao = strIP
           frm!UserModificacaoLog = strUserLog
       End If
       
       
    Exit_RegistaAlteracoes:
       Exit Function

    End Function

    o problema é quando eu clico em qualquer campo campo do subform, ele muda automaticamente o campo "UserModificacao". Para isso no subform eu tenho

    Private Sub Form_BeforeUpdate(Cancel As Integer)
    Call RegistaAlteracoes(Me, False)
    End Sub

    só funciona se tiver no "antes de atualizar.

    eu gostaria de colocar no botão de salvar, ou seja ele só vai atualizar o campo "UserModificacao" se eu fizer alteração e clicar no botão salvar.

    alguem pode me ajudar?

    esse link é de uma foto do bd [Você precisa estar registrado e conectado para ver este link.]
    avatar
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

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

    Re: Registrando alterações no form apenas se atualizar algum campo

    Mensagem  Silvio em Seg 14 Maio 2018, 14:34

    Tardesss

    Teste no botão salvar

    Call RegistaAlteracoes()


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

    Ismaelsousa
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 11/02/2016

    Re: Registrando alterações no form apenas se atualizar algum campo

    Mensagem  Ismaelsousa em Ter 15 Maio 2018, 15:25

    Olá amigo Silvio,

    não deu certo. ele fala que o valor não é opçional

    mas consegui resolver o problema. Coloquei "Call RegistaAlteracoes(Me, False)" no botão salvar e coloquei o botão salvar dentro do subformulário. ele estava no form e como as alterações são feitas apenas no subform, deu certo.

    Obrigado pela atenção e ajuda. vlw
    avatar
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

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

    Re: Registrando alterações no form apenas se atualizar algum campo

    Mensagem  Silvio em Ter 15 Maio 2018, 16:22

    Maravilha...não se esqueça de dar o tópico como resolvido.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

    Ismaelsousa
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 11/02/2016

    Re: Registrando alterações no form apenas se atualizar algum campo

    Mensagem  Ismaelsousa em Ter 15 Maio 2018, 16:51

    COMO FAÇO ISSO?

      Data/hora atual: Ter 22 Maio 2018, 22:30