Fórum consulta no sqlquery #278575
22/04/2005
0
DataModule1.sqlqcliente.Close;
DataModule1.sqlqcliente.SQL.Clear;
DataModule1.sqlqcliente.SQL.Add(´select NOME,´);
DataModule1.sqlqcliente.SQL.Add(´TELEFONE, E_MAIL from cliente´);
DataModule1.sqlqcliente.SQL.Add(´where NOME like ´´+edit1.Text+´¬´´);
DataModule1.sqlqcliente.Open;
so que não dá certo .
tem algo erra
agradeço pela ajuda
rafael
Radolpho
Curtir tópico
+ 0Posts
22/04/2005
Mysys
qual a mensagem de erro..??
Gostei + 0
22/04/2005
Aroldo Zanela
Tente o seguinte:
DataModule1.sqlqcliente.SQL.Add(´where NOME like ´+QuotedStr(edit1.Text+´¬´));
Gostei + 0
28/04/2005
Radolpho
fiz o que você disse, não deu erro só que não mostrou os dados da tabela
mostrou todos
valeu
Gostei + 0
28/04/2005
Radolpho
eu coloquei esse codigo
DataModule1.sqlqcliente.Close;
DataModule1.sqlqcliente.SQL.Clear;
DataModule1.sqlqcliente.SQL.Add(´select NOME,´);
DataModule1.sqlqcliente.SQL.Add(´TELEFONE, E_MAIL from cliente´);
DataModule1.sqlqcliente.SQL.Add(´where NOME like ´´+edit1.Text+´¬´´);
DataModule1.sqlqcliente.Open;
so que não dá certo, dá a seguinte menssagem:
´Column Unknown ´conteudo do edit1.text´¬´
oque é isso , me ajudem por favor , não consigo descubrir o erro
valeu
Gostei + 0
28/04/2005
Christian_adriano
Tente o seguinte:
with DataModule1.sqlqcliente do begin Close; SQL.Clear; SQL.Add(´select NOME,´); SQL.Add(´TELEFONE, E_MAIL from CLIENTE´); SQL.Add(´where upper(NOME) LIKE upper(:Valor)´); ParamByName(´Valor´).asString := edit1.Text + ´¬´; Open; end;
t+
Christian.
Gostei + 0
29/04/2005
Radolpho
funcionou direitinho o programa
obrigado.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)