SELECT USANDO LIKE
Boa noite galera, algm pode me ajudar a fazer um select usando o operador Like
esqueci como se usa
Estou querendo preencher um list view com base no que é digitado em um textbox de pesquisa.. oq eu quero fazer é que nao importe o que vem antes e nem depois, se tiver oq esta sendo digitado i'ra preenchendo a listview com os dados do banco
no evento change do textbox chamaria essa rotina :
If txtPesquisa <> [Ô][Ô] Then
Set dspesqproduto = db.OpenRecordset([Ô]select * from produtos where descricao like =[ô][Ô] & txtPesquisa & [Ô]*[ô][Ô], dbOpenDynaset)
If dspesqproduto.RecordCount > 0 Then
Do While Not dspesqproduto.EOF
Set lstPesq = lstPesquisa.ListItems.Add
lstPesq.Text = dspesqproduto!codigo
lstPesq.SubItems(1) = dspesqproduto!descricao
lstPesq.SubItems(2) = dspesqproduto!estoque
lstPesq.SubItems(3) = dspesqproduto!preco
Loop
End If
End If
PS: tb ainda nao sei se está preenchendo certinho rs
esqueci como se usa
Estou querendo preencher um list view com base no que é digitado em um textbox de pesquisa.. oq eu quero fazer é que nao importe o que vem antes e nem depois, se tiver oq esta sendo digitado i'ra preenchendo a listview com os dados do banco
no evento change do textbox chamaria essa rotina :
If txtPesquisa <> [Ô][Ô] Then
Set dspesqproduto = db.OpenRecordset([Ô]select * from produtos where descricao like =[ô][Ô] & txtPesquisa & [Ô]*[ô][Ô], dbOpenDynaset)
If dspesqproduto.RecordCount > 0 Then
Do While Not dspesqproduto.EOF
Set lstPesq = lstPesquisa.ListItems.Add
lstPesq.Text = dspesqproduto!codigo
lstPesq.SubItems(1) = dspesqproduto!descricao
lstPesq.SubItems(2) = dspesqproduto!estoque
lstPesq.SubItems(3) = dspesqproduto!preco
Loop
End If
End If
PS: tb ainda nao sei se está preenchendo certinho rs
Você pode usar o evento OnChange para que toda vez que você digite algo na caixa de texto este execute uma função que atualize o listbox.
sim é mais ou menos isso..
até ai nao tenho duvida ... nao to conseguindo fazer o select...
vc pode ver se esta certo ou como eu faria?
Está assim minha query
Set dspesqproduto = db.OpenRecordset([Ô]select * from produtos where descricao like =[ô][Ô] & txtPesquisa & [Ô]*[ô][Ô], dbOpenDynaset)
até ai nao tenho duvida ... nao to conseguindo fazer o select...
vc pode ver se esta certo ou como eu faria?
Está assim minha query
Set dspesqproduto = db.OpenRecordset([Ô]select * from produtos where descricao like =[ô][Ô] & txtPesquisa & [Ô]*[ô][Ô], dbOpenDynaset)
Altere a linha abaixo e tente novamente:
Set dspesqproduto = db.OpenRecordset([Ô]SELECT * [Ô] & _
[Ô]FROM produtos [Ô] & _
[Ô]WHERE descricao [Ô] & _
[Ô]LIKE [ô]*[Ô] & txtPesquisa & [Ô]*[ô][Ô], dbOpenDynaset)
Vou tentar.. programei varias coisas em meia hora.. deu erro no projeto e fecho e eu n tinha salvo ¬¬
to fazendo de novo e ja venho postar se deu certo.. obrigado Tecla
to fazendo de novo e ja venho postar se deu certo.. obrigado Tecla
Obrigado TECLA, funcionou perfeitamente...
Abraços
Abraços
Tópico encerrado , respostas não são mais permitidas