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

    [Resolvido]Atualizar tabela de dados

    Compartilhe

    gordo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 10/10/2011

    [Resolvido]Atualizar tabela de dados

    Mensagem  gordo em Qui 18 Fev 2016, 02:07

    Prezados,

    Estou tentando fazer uma atualização na tabela do meu banco de dados no evento de fechamento do formulário. Mas funciona só em alguns campos da tabela.

    Private Sub Form_Close()
    On Error Resume Next
    If IsNull(Responsavel) Then
    cbxTipoParecer = Null -> não acoplado
    Me.Parecer = "Pendente" -> acoplado
    End If
    End Sub

    No final da execução desse evento, o campo não acoplado não atualiza a tabela e fica nullo. Entretanto o campo parecer, mesmo sendo acoplado, teria que atualizar o campo da tabela para "Pendente" mas isso não acontece.

    Este evento é para que os campos da tabela não fiquem com os registros informados sem que o usuário conclua a alteração, ou seja, se o formulário for fechado sem a conclusão do procedimento de edição, o registro da tabela não fica atualizado de forma incompleta.

    desde já agradeço


    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3151
    Registrado : 14/08/2013

    Re: [Resolvido]Atualizar tabela de dados

    Mensagem  FabioPaes em Qui 18 Fev 2016, 22:49

    Remova o Botao Fechar do Formulario, e add um Novo Botao no Formulario, no evento ao clicar do botao coloque Contrutor de Codigo... e Coloque o Codigo la..


    On Error Resume Next
    If IsNull(Responsavel) Then
    cbxTipoParecer = Null -> não acoplado
    Me.Parecer = "Pendente" -> acoplado
    End If
    docmd.Close


    gordo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 28
    Registrado : 10/10/2011

    Re: [Resolvido]Atualizar tabela de dados

    Mensagem  gordo em Dom 16 Abr 2017, 14:03

    Deu certo

      Data/hora atual: Dom 25 Jun 2017, 11:30