Fórum Rotina de busca #155039
15/04/2003
0
O que quer esta errado nesta rotina??
begin
if Trim(edit1.Text) <>´´then
begin
query1.SQL.Clear;
query1.SQL.Add(´select * from Tb_OrdensServico where 0=0´);
query1.SQL.Add(´and Placa like + Trim(edit1.Text) + ´¬´´);
query1.close;
query1.Open;
Agradeço!!!!!!
Coppola
Curtir tópico
+ 0Posts
15/04/2003
Motta
begin
query1.SQL.Clear;
query1.SQL.Add(´select * from Tb_OrdensServico where 0=0´);
query1.SQL.Add(´ and Placa like ´ + quotestr(Trim(edit1.Text)) + ´¬´´);
query1.close;
query1.Open;
0=0´ !!??
Gostei + 0
15/04/2003
Coppola
if Trim(edit1.Text) <>´´then
begin
query1.SQL.Clear;
query1.SQL.Add(´select * from Tb_OrdensServico where 0=0´);
query1.SQL.Add(´ and Placa like ´ + quotestr(Trim(edit1.Text)) + ´¬´´);
query1.close;
query1.Open;
o erro esta sendo em quotestr. o que faço para corrigir!
Gostei + 0
15/04/2003
Aroldo Zanela
Gostei + 0
15/04/2003
Coppola
if Trim(edit1.Text) <>´´then
begin
query1.SQL.Clear;
query1.SQL.Add(´select * from Tb_OrdensServico where 0=0´);
query1.SQL.Add(´ and Placa like ´ + quotedstr(Trim(edit1.Text)) + ´¬´´´);
query1.close;
query1.Open;
Gostei + 0
15/04/2003
Aroldo Zanela
if Trim(edit1.Text) <>´´ then begin query1.close; query1.SQL.Clear; query1.SQL.Add(´select * from Tb_OrdensServico where ´); query1.SQL.Add(´ Placa like ´ + quotedstr(Trim(edit1.Text)) + ´¬´); query1.Open;
Se não funcionar mando o erro.
Gostei + 0
15/04/2003
Oscarluiz
[]´s
Oscar Luiz R. de Oliveira
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)