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]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    avatar
    Murilo Rosa
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 04/06/2011

    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Murilo Rosa 17/7/2012, 15:41

    Olá Galera do Forum.

    Vi um exemplo do JPaulo aqui no forum que é passar de um listbox para o outro. Teria como fazer isso sem utilizar o update na tabla e o select no listbox.
    A principio ele muda o status do filtro na tabela. e faz uma nova seleção.

    Eu clicar duas vezes ele ir do Listbox 1 para o Listbox 2 e depois inserir em uma tabela tbHistorico todos do Listbox 2.

    Abçs.
    avatar
    Convidado
    Convidado


    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Convidado 17/7/2012, 22:45

    Depende de como está as origens dessas listBox's...

    Se são baseadas em tabelas diferentes.. deves utilizar a instrução InsertInto, se baseado na mesma tabela.... a instrução Update..

    Na list não tem como marcar um campo Sim/Não sem utilizar um Update para a tebela...


    Se puder poste o exemplo dos objetos envonvidos para possamos ver..

    Cumprimentos.
    Luís Augusto
    Luís Augusto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Luís Augusto 18/7/2012, 00:11

    Com a permissão de ambas as partes, estou com o mesmo "problema". Tentei adaptar essa situação usando modulo de classe sugerido no link abaixo.
    Acredito que talvez a falta de conhecimento fizesse com que eu não obtivesse êxito nessa adaptação.
    Existe também uma opção com módulo normal, mas tem que criar uma tabela, não testei.

    http://www.tek-tips.com/faqs.cfm?fid=6326

    Tem um porém, com o módulo de classe você terá que referenciar o DAO.

    Ocorre erro nestas linhas.

    Private WithEvents mCmdMoveFromListOneToListTwo As Access.CommandButton
    Private WithEvents mCmdMoveFromListTwoToListOne As Access.CommandButton
    Private WithEvents mCmdMoveAllFromListOneToListTwo As Access.CommandButton
    Private WithEvents mCmdMoveAllFromListTwoToListOne As Access.CommandButton
    avatar
    Convidado
    Convidado


    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Convidado 18/7/2012, 00:30

    Post o teu modelo Luis.. para que possamos ver o que pretende...

    Cumprimentos.
    avatar
    Murilo Rosa
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 04/06/2011

    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Murilo Rosa 18/7/2012, 01:30

    É isso Luis.

    vi uns modelos que ele atualzia a tabela com um update e faz uma nova consulta com select. No meu caso nao posso atualizar a tablea so depois que eu clicar em nserir ae insere na tabela tbSelecao os Nomes do Listbox 2
    avatar
    Convidado
    Convidado


    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Convidado 18/7/2012, 01:33

    Boas Luis Augusto... Com o código que citou em teu post, fiz o exemplo pra ti.

    http://maximoaccess.forumeiros.com/t8671-mover-de-listbox-para-outra-listbox#69835


    Cumprimentos.
    avatar
    Murilo Rosa
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 04/06/2011

    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Murilo Rosa 18/7/2012, 01:42

    PILOTO, vlw cara... pense no alivio.

    agora para dar como Resolvido esse tópico. Para inserir os dados do Listbox na tabela2 como faço?

    No exemplo nao tem que vc criou nao vi.
    Luís Augusto
    Luís Augusto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Luís Augusto 18/7/2012, 02:11

    Muito obrigado Piloto, respondi no repositório.
    Era isso mesmo, será de grande valia ao fórum.
    Very Happy
    avatar
    Convidado
    Convidado


    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Convidado 18/7/2012, 03:14

    O exemplo no repositório está atualizado..

    Observem que o campo1 na tabela esta com duplicacao nao autorizada...

    Porque isso?


    Suponha que na lista 1 tenha:
    Registro: aaa
    e na lista 2:
    Registro: bbb

    voçê passa o aaa para a lista 2, e na hora de atualizar.. ele lanca todos os valores da lista, como o bbb ja está na lista dois, o duplicaria, por isso o campo com duplicação não autorizada...

    Bem... é isso..

    De posse do exemplo podem adaptá-lo conforme queiram...


    Foi um bom exercício de aprendizado para mim. Obrigado pela oportunidade da Ajuda.

    Até mais. cheers cheers
    avatar
    Murilo Rosa
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 04/06/2011

    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Murilo Rosa 19/7/2012, 12:27

    PILOTO

    Valeu consegui aplciar ao meu projeto. Agora tentei encaixar o If (dlookup) para verifica na tabela se ja existe o candidado naquela data cadastrado.

    Tem alguma noção como posso fazer isso?

    Att.
    avatar
    Convidado
    Convidado


    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Convidado 19/7/2012, 14:49

    Bom dia Amigos... Nova Dúvida Novo Tópico!

    Assim manteremos a hegemonia dos assuntos no Fórum.

    Creio que este tópico está resolvido.

    Cumprimentos.
    avatar
    Murilo Rosa
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 04/06/2011

    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Murilo Rosa 29/7/2012, 00:44

    Obrigado a galera... sempre prestativos..
    avatar
    Convidado
    Convidado


    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Convidado 29/7/2012, 01:52

    Faltou o Resolvido no tópico.

    PAra dar um tópico por resolvido, pressione o botão Resolvido logo acima e a direita do botão enviar.

    Cumprimentos.
    avatar
    Murilo Rosa
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 78
    Registrado : 04/06/2011

    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Murilo Rosa 29/7/2012, 21:43

    Vlwww
    avatar
    Convidado
    Convidado


    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Convidado 29/7/2012, 21:57

    Evite tambem expressões utilizadas em chat's.

    O Fórum agradece o Retorno.

    Conteúdo patrocinado


    [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela Empty Re: [Resolvido]Passar do Listbox 1 para o Listbox 2 e Cadastrar nova tabela

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 21/11/2024, 22:59