Update - SQL

Delphi

25/06/2003

Galera o que esta errado neste código:

dm.Qr_BaixaFinServ.SQL.Clear;
dm.Qr_BaixaFinServ.SQL.Add(´UPDATE tb_ordensservico set SituacaoRecebimento=:servico where placa like:placa´);
dm.Qr_BaixaFinServ.ParamByName(´placa´).AsString:=´¬´+edit1.Text+´¬´;
dm.Qr_BaixaFinServ.ParamByName(´servico´).AsString:=´¬´+combobox1.Text+´¬´;
dm.Qr_BaixaFinServ.Open;

Eu queria que fizesse uma busca no campo edit1 e alterasse pelo combobox


Coppola

Coppola

Curtidas 0

Respostas

Delmar

Delmar

25/06/2003

depois do like tente:
like=:parametro
e tente executar assim
query.sql.exec; //não lembro bem, mas tem um tal de exec


GOSTEI 0
Maximus

Maximus

25/06/2003

esperimente fazer sem parametros o like

SituacaoRecebimento=:servico where placa like ´+chr(39)+´¬´+Edit1.text+´¬´+chr(39);


GOSTEI 0
Jeancamila

Jeancamila

25/06/2003

Colega,

Primeiro, creio que ao dar um update vc que atualizar todos os que começam com uma letra? Creio que seria melhor usar o update com a chamada do parametro da seguinte forma:

dm.Qr_BaixaFinServ.SQL.Clear;
dm.Qr_BaixaFinServ.SQL.Add(´UPDATE tb_ordensservico set SituacaoRecebimento=:servico where placa =:placa´);
dm.Qr_BaixaFinServ.ParamByName(´placa´).AsString:=edit1.Text;
dm.Qr_BaixaFinServ.ParamByName(´servico´).AsString:=combobox1.Text;
dm.qr_baixafinserv.execsql;


Espero que tenha ajudado!

Jean


GOSTEI 0
Thaisandrade

Thaisandrade

25/06/2003

O que está acontecendo de errado? De cara posso te dar uma dica: Para comandos DML, é mais adequado usar o método ExecSQL do que o método Open.


GOSTEI 0
POSTAR