Fórum Como criar parâmetro em tempo de exec., usando ADO ??? #175589
18/08/2003
0
Como criar parâmetros em tempo de execução, usando ADO ???
É o seguinte,
Estou usando Acess, e para conexão, os objetos ADO:
ADOConnection, ADODataset, e para consultas SQL eu estou usando:
ADOQuery, Data Source, DBGrid
Eu quero criar uma consulta, onde o usuário é quem defina os parâmetros.
Ex.:
Tabela ´Normas Técnicas´, campos: cod, nome, ano, assunto, instituição...
No meu Form, tenho vários checkbox´s, cada um deles se refere a cada campo da tabela, no qual o usuário pretende fazer a condulta,
e os checkbox´s que forem clicados, aparece um edit para cada um deles.
Por exemplo, o usuário quer procurar uma Norma Técnica, onde aparece a palavra ´solda´, no campo Assunto, e que essa norma seje do ano ´2000´.
Logo ele vai marcar os Checkbox´s, Assunto e ano , e digitar as palavra nos respectivos edits. (solda, 2000).
O conteúdo desses EDIT´s, é que irão passar os parâmetros para a Query.
Por favor como fazer???
Alguém pode me enviar um exemplo bem DETALHADO, ou pelo Fórum ou pelo meu e-m@il ??? lbsystems@bol.com.br
Muito Grato !!!
LEO.
É o seguinte,
Estou usando Acess, e para conexão, os objetos ADO:
ADOConnection, ADODataset, e para consultas SQL eu estou usando:
ADOQuery, Data Source, DBGrid
Eu quero criar uma consulta, onde o usuário é quem defina os parâmetros.
Ex.:
Tabela ´Normas Técnicas´, campos: cod, nome, ano, assunto, instituição...
No meu Form, tenho vários checkbox´s, cada um deles se refere a cada campo da tabela, no qual o usuário pretende fazer a condulta,
e os checkbox´s que forem clicados, aparece um edit para cada um deles.
Por exemplo, o usuário quer procurar uma Norma Técnica, onde aparece a palavra ´solda´, no campo Assunto, e que essa norma seje do ano ´2000´.
Logo ele vai marcar os Checkbox´s, Assunto e ano , e digitar as palavra nos respectivos edits. (solda, 2000).
O conteúdo desses EDIT´s, é que irão passar os parâmetros para a Query.
Por favor como fazer???
Alguém pode me enviar um exemplo bem DETALHADO, ou pelo Fórum ou pelo meu e-m@il ??? lbsystems@bol.com.br
Muito Grato !!!
LEO.
Lbsystems
Curtir tópico
+ 0
Responder
Posts
18/08/2003
Michel
Olha eu faço assim;
Ex;
Select cliente.nome,cliente.fone from cliente where cliente.codigo: =cod1
adoquery1.paramanter.paramnbyname(´cod1´).value := Alguma coisa;
Vc tb pode testar
Se alguma coisa esta marcada entao
AdoQuery1.sql.add(´ And cliente.algumacoisa: =cod2´);
adoquery1.paramanter.paramnbyname(´cod2´).value := Alguma coisa;
Espero ter te ajudado
Ex;
Select cliente.nome,cliente.fone from cliente where cliente.codigo: =cod1
adoquery1.paramanter.paramnbyname(´cod1´).value := Alguma coisa;
Vc tb pode testar
Se alguma coisa esta marcada entao
AdoQuery1.sql.add(´ And cliente.algumacoisa: =cod2´);
adoquery1.paramanter.paramnbyname(´cod2´).value := Alguma coisa;
Espero ter te ajudado
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)