FILTRAGEM

USUARIO.EXCLUIDOS 08/01/2005 19:01:35
#59478
Ola, eu to usando esse codigo para pesquisa usando filtragem... mais ta dando: erro de sintaxe na clausila from, alguem sabe pq?


Private Sub Text11_Change()
    Dim criterio1 As String
    criterio1 = Chr$(39) & Text11.Text & "*" & Chr(39)
    Adodc1.RecordSource = "SELECT Endereco,Numero,Bairro,CEP,Telefone,Celular FROM Cliente WHERE nome LIKE " & criterio1
    Adodc1.Refresh
End Sub
WEBMASTER 08/01/2005 19:05:07
#59480 Resposta escolhida
Se você postar o critério LIKE, fica mais fácil ;)
USUARIO.EXCLUIDOS 08/01/2005 19:17:28
#59482
acabei de descobrir que esse codigo naum ta funcionando.....
alguem me posta um exemplo de como filtrar usando datalist e adodc?
WEBMASTER 08/01/2005 19:40:38
#59486
hmmm....não entendi !!!

por quê não está funcionando ?

só posta o conteúdo do Text11.Text quando você faz a filtragem ;)))...
USUARIO.EXCLUIDOS 08/01/2005 19:48:47
#59488
tipo.. eu quero que quando eu digite f ele coloque todos os clientes que começam com a letra f...
mais n ta acontecendo isso.. ehehehe
qual comando eu coloco no datalist?
deu pra percebe que eu to meio perdido neh?
USUARIO.EXCLUIDOS 08/01/2005 20:55:01
#59505
Tente assim:

Adodc1.RecordSource = "SELECT Endereco,Numero,Bairro,CEP,Telefone,Celular FROM Cliente WHERE nome LIKE '" & criterio1 & "*'"
    Adodc1.Refresh

USUARIO.EXCLUIDOS 08/01/2005 22:47:09
#59517
Ae deu certo.... usei o ultimo exemplo qui o Young Hacker mandou....
quem tiver com o mesmo problema da uma olhada la...
falowz.
Tópico encerrado , respostas não são mais permitidas
Voltar