Delphi+access+like

[dtgb]

merhabalar arkadaslar
dm.Qkumas.SQL.Text :='Select * from dbo_Kaliteler where KaliteAdi like ''' + Deg1 + ''' or KaliteAdi like ''' + deg2 + '''';
kod hata vermeden calısıyor fakat
burada like komustu duzgun calısmıyor sorgulama yaprken aramak istedigim kayıdın tamamını yazmam gerekiyor sorun ne olabilir bi fikri olan var mı?

[ALUCARD]

merhabalar arkadaslar
dm.Qkumas.SQL.Text :='Select * from dbo_Kaliteler where KaliteAdi like ''' + Deg1 + ''' or KaliteAdi like ''' + deg2 + '''';
kod hata vermeden calısıyor

sadece yapman gereken

Kod: Tümünü seç

dm.Qkumas.SQL.Text :='Select * from dbo_Kaliteler where KaliteAdi like ''%' + Deg1 + '%'' or KaliteAdi like ''%' + deg2 + '%''';

[dtgb]

Cok tesekkurler
birgun sqlde bu karakterlerin kullanımını cozecegim ama nezamana bakalım:)
kolay gelsin...

[gkimirti]

veritabanı seminerlerini izlerseniz eminim cozersiniz
aksi takdirde ezbere giderseniz bir sonraki durakta yine takılırsınız.

[MakPRO]

ben aşağıdaki gibi kullanıyorum tavsiye ederim

Kod: Tümünü seç

SQL:='select * from cardopt where bcode like :BCODE and ccode like :CCODE and cnumber like :CNUMBER and name like :NAME and branch like :BRANCH order by '+Column.FieldName;
D.cardopt.Active:=false;
D.cardopt.DataSet.CommandText:=SQL;
with D.cardopt.DataSet do begin
ParamByName('BCODE').Text:='%'+BCODE.Text+'%';
ParamByName('CCODE').Text:='%'+CCODE.Text+'%';
ParamByName('CNUMBER').Text:='%'+CNUMBER.Text+'%';
ParamByName('NAME').Text:='%'+ kartsahibi.Text+'%';
ParamByName('BRANCH').Text:='%'+sube.Text+'%';
end;
 D.cardopt.Active:=True;