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

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.

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.

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

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

Cumprimentos.

É 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

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.

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.

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

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.

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.

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.

Obrigado a galera... sempre prestativos..

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.

Vlwww

Evite tambem expressões utilizadas em chat's.

O Fórum agradece o Retorno.