MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    Adicionar todos os itens de um Listview em uma tabela do Access

    Compartilhe

    victorsamvs
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 01/05/2014

    Adicionar todos os itens de um Listview em uma tabela do Access

    Mensagem  victorsamvs em Sab 01 Nov 2014, 18:12

    Pessoal pesquisei em tudo na net e não consigo encontra um código que adiciona todos os itens de um ListView no banco de dados access

    Bem não sei se é possível mas seria bom para o meu projeto...

    desde já agradeço..

    formiga10x
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 731
    Registrado : 11/09/2013

    Re: Adicionar todos os itens de um Listview em uma tabela do Access

    Mensagem  formiga10x em Sab 01 Nov 2014, 20:11

    Amigo boa tarde.
    Para ter dados numa list ela tem de ser alimentado por uma consulta ou tabela correto? Então porque não fazer a filtragens direto da tabela / consulta que alimenta a lista?


    .................................................................................
    Abraço
    Formiga10x

    Sempre que possível poste o bd ou parte dele, com uma explicação bem clara e objetiva do que quer.
    “Um homem não está acabado quando enfrenta a derrota. Ele está acabado quando desiste - Richard Nixon”
    Formiga10x

    "Lembro do exato momento em que me dei conta que boa parte de minha vida foi dedicada a localizar erros em meus próprios programas."
    - Maurice Vicent Wilkes

    victorsamvs
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 10
    Registrado : 01/05/2014

    Res: formiga10x

    Mensagem  victorsamvs em Dom 02 Nov 2014, 02:39

    Então não sei se foi eu que não entendi ou foi vc que não entendeu o que citei rsrsr Smile

    Mas vamos la, Minha ListView já esta sendo alimentada com os dados do banco access.

    É que não sei se deixei bem claro, mas o que eu quero é:

    Salvar todos os itens linha por linha da minha listview no banco de dados.

    [Você precisa estar registrado e conectado para ver esta imagem.]

    formiga10x
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 731
    Registrado : 11/09/2013

    Re: Adicionar todos os itens de um Listview em uma tabela do Access

    Mensagem  formiga10x em Dom 02 Nov 2014, 14:34

    Boa tarde.
    Veja este exemplo que fiz para vc se basear. Num form que carrega a lista de acordo com os critérios no textbox e um botão salvar.
    Após fazer a filtragem digamos Rede todos os itens que estiver na tabela Produto com o nome de rede serão exibidos na lista e um botão salvar da da lista para a tabela que salva todos os itens da lista numa nova tabela.

    Código:
    Private Sub btnGravar_Click()
    Dim c
    Dim descricao
    Dim codigo

    For c = 1 To lstProduto.ListCount - 1
    codigo = lstProduto.Column(0, c)
    descricao = lstProduto.Column(1, c)

    CurrentDb.Execute "Insert Into tblProdutoSalvo (CodProduto,NomeProduto) Values ('" & codigo & "','" & descricao & "')"
    Next c
    End Sub
    Anexos
    GravarRegsListFromTab.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (29 Kb) Baixado 49 vez(es)


    .................................................................................
    Abraço
    Formiga10x

    Sempre que possível poste o bd ou parte dele, com uma explicação bem clara e objetiva do que quer.
    “Um homem não está acabado quando enfrenta a derrota. Ele está acabado quando desiste - Richard Nixon”
    Formiga10x

    "Lembro do exato momento em que me dei conta que boa parte de minha vida foi dedicada a localizar erros em meus próprios programas."
    - Maurice Vicent Wilkes

    deh.lferreira
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1
    Registrado : 27/04/2015

    Re: Adicionar todos os itens de um Listview em uma tabela do Access

    Mensagem  deh.lferreira em Qui 12 Nov 2015, 20:47

    formiga10x o seu código funciona perfeitamente, mais ele é para ListBox e não ListView, você saberia como fazer isso com a listview?
    Pois eu tenho a mesma duvida do nosso amigo ai.

    obrigado!

      Data/hora atual: Seg 05 Dez 2016, 04:23