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]Atualizar tabela de dados

    avatar
    gordo
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Atualizar tabela de dados Empty [Resolvido]Atualizar tabela de dados

    Mensagem  gordo 18/2/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


    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Atualizar tabela de dados Empty Re: [Resolvido]Atualizar tabela de dados

    Mensagem  FabioPaes 18/2/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

    avatar
    gordo
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Atualizar tabela de dados Empty Re: [Resolvido]Atualizar tabela de dados

    Mensagem  gordo 16/4/2017, 14:03

    Deu certo

    Conteúdo patrocinado


    [Resolvido]Atualizar tabela de dados Empty Re: [Resolvido]Atualizar tabela de dados

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 25/11/2024, 00:12