FILTROS LISTVIEW
To usando uma rotina de filtros no meu listview que funciona da seguinte forma:
O programa abre a tabela e compara meu filtro com o item List.Text (filtro = List.Text), caso seja igual, esconde os outros itens e deixa na tela só os que me interessam. Depois desse filtro, tenho que fazer outros nesse mesmo list, então como a minha rotina compara o primeiro item da tabela, tenho que mudar esse List pra outro (subitem), então criei várias rotinas pra mudar o List.Text e os subitens de acordo com minha necessidade. Ocorre que toda hora que chamo esses eventos, ele traz a tabela completa, sem os filtros estabelecidos anteriormente. Como faço pra mudar isso sem carregar a tabela inteira? Mudar já considerando o filtro feito.
O programa abre a tabela e compara meu filtro com o item List.Text (filtro = List.Text), caso seja igual, esconde os outros itens e deixa na tela só os que me interessam. Depois desse filtro, tenho que fazer outros nesse mesmo list, então como a minha rotina compara o primeiro item da tabela, tenho que mudar esse List pra outro (subitem), então criei várias rotinas pra mudar o List.Text e os subitens de acordo com minha necessidade. Ocorre que toda hora que chamo esses eventos, ele traz a tabela completa, sem os filtros estabelecidos anteriormente. Como faço pra mudar isso sem carregar a tabela inteira? Mudar já considerando o filtro feito.
DAO
Set TB = Base.OpenRecordSet("Select * From SUATABELA Where NOME like '*" & txtNome & "*'",dbOpenSnapShot)
if tb.recordcount > 0 then
TB.movelast
tb.movefirst
end if
'Rotina que carrega o listview
ADO
TB.Open "Select * From SUATABELA Where NOME like '*" & txtNome & "*'",Base, DbOpenKeySet
'Rotina que carrega o listview
Set TB = Base.OpenRecordSet("Select * From SUATABELA Where NOME like '*" & txtNome & "*'",dbOpenSnapShot)
if tb.recordcount > 0 then
TB.movelast
tb.movefirst
end if
'Rotina que carrega o listview
ADO
TB.Open "Select * From SUATABELA Where NOME like '*" & txtNome & "*'",Base, DbOpenKeySet
'Rotina que carrega o listview
Tópico encerrado , respostas não são mais permitidas