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]Preencher com os dados da list

    avatar
    Kaynan
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2974
    Registrado : 09/04/2012

    [Resolvido]Preencher com os dados da list Empty [Resolvido]Preencher com os dados da list

    Mensagem  Kaynan 20/1/2023, 14:58

    Bom dia pessoal,tenho esse exemplo de OS que o amigo Alexandre desenvolveu,e quero que ao clicar 2 vzs na list do "frmSubManutencao"preencher os campos acima com os mesmos dados.
    Abçs.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3217
    Registrado : 13/12/2016

    [Resolvido]Preencher com os dados da list Empty Re: [Resolvido]Preencher com os dados da list

    Mensagem  Alexandre Fim 20/1/2023, 17:42

    Kaynan, inclua o campo id_manut na fonte de Registro do subformulário, conforme abaixo:
    [Resolvido]Preencher com os dados da list Sysos112

    Em seguida, no evento Ao Clicar Duas Vezes na lista "lstManut", copie e cole o seguinte código:

    Private Sub lstManut_DblClick(Cancel As Integer)

    '-- filtra os dados do formulário através do id_manut da listbox (coluna 0, escondida)
    Me.Filter = "[id_manut] = " & Me.lstManut.Column(0) & ""
    '-- aplica o filtro
    Me.FilterOn = True
    '-- atualiza subformulário
    Me.Refresh

    End Sub


    É isso

    Att,

    Alexandre Fim



    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Preencher com os dados da list Setinf11
    Sistemas e Tecnologia Ltda
    avatar
    Kaynan
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2974
    Registrado : 09/04/2012

    [Resolvido]Preencher com os dados da list Empty Re: [Resolvido]Preencher com os dados da list

    Mensagem  Kaynan 20/1/2023, 19:31

    Opaa,funcionou em partes Alexandre,eu abro a OS e cadastro o equipamento,preencho todos os campos e gravo,depois vou em manutenção preencho os campo e gravo.
    Mas se eu clico na aba equipamentos pra escolher outro equipamento da essa mensagem.

    [Resolvido]Preencher com os dados da list Captur17
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3217
    Registrado : 13/12/2016

    [Resolvido]Preencher com os dados da list Empty Re: [Resolvido]Preencher com os dados da list

    Mensagem  Alexandre Fim 20/1/2023, 21:00

    Kaynan,

    Vou ajustar esse problema e te mando nova versão.
    Esse erro é gerado pq na guia de Manutenção, quando há o cadastro do registro, o Access diz que vc é obrigado a informar o Tipo de Serviço, por causa do relacionamento na tabela, que garante a integridade referencial.
    Mas vou mudar essa lógica e ai não vai gerar mais erro.

    Aguarde.

    Att,

    Alexandre Fim


    .................................................................................
    Arrow  Marcar tópico como Resolvido: clique aqui
    Arrow  Postar anexos no fórum: clique aqui

    [Resolvido]Preencher com os dados da list Setinf11
    Sistemas e Tecnologia Ltda
    avatar
    Kaynan
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2974
    Registrado : 09/04/2012

    [Resolvido]Preencher com os dados da list Empty Re: [Resolvido]Preencher com os dados da list

    Mensagem  Kaynan 20/1/2023, 21:21

    Ok blz.
    avatar
    Kaynan
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2974
    Registrado : 09/04/2012

    [Resolvido]Preencher com os dados da list Empty Re: [Resolvido]Preencher com os dados da list

    Mensagem  Kaynan 25/1/2023, 17:11

    Laughing Fechando.

    Conteúdo patrocinado


    [Resolvido]Preencher com os dados da list Empty Re: [Resolvido]Preencher com os dados da list

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 25/4/2024, 02:41