CONSULTA NO DBGRID
Amigos eu gostaria de saber como fazer uma consulta no dbgrid por exemplo
se o text1.text for 001 ele mostar todos os registros 001 se for 002 mostrar todos 002 no db grid algem pode me ajudar..
se o text1.text for 001 ele mostar todos os registros 001 se for 002 mostrar todos 002 no db grid algem pode me ajudar..
dim Texto as string
dim SQL as string
texto = text1.text
sql = "SELECT * FROM SUA TABELA LIKE " & texto
rs.recordsourse = SQL
rs.refresh
END SUB
AXO Q é + OU - ASSIM, só to em dúvida lá na parte do LIKE, vou olhar lá em casa daà se for dif eu posto.
P.S. Ao localizar seu DBGRID vai ficar só com a linha onde localizou...
Nos meus projetos eu sempre coloco, após localizar, a opção "MOSTRAR TODOS OS REGISTROS", daà faço:
SQL = "SELECT * FROM MYTABLE ORDER BY MY FIELD"
Tópico encerrado , respostas não são mais permitidas