Selamlar arkadaşlar,
aşağıdaki kodlamada birsden fazla alana göre sorgulama yapmak istiyorum ama hata veriyor sanırım sql cümlesinin delphiye uyarlanmasında bir sorun var yardımcı olursanız seviirim
dm.QGr_karsilastir.SQL.Clear;
dm.QGr_karsilastir.SQL.Add('Select * from QgramajKarsilastir where tarih =:tar and gramaj=20 and (and FarkYuzde =: oran or FarkYuzde =: oran*-1) ') ;
dm.QGr_karsilastir.Parameters.ParamByName('tar').Value:=CBTarih.Text;
dm.QGr_karsilastir.Parameters.ParamByName('oran').Value:=strtoint(Edit1.Text);
dm.QGr_karsilastir.Open;
QUERY İLE SQL KULLANIMI
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
Re: QUERY İLE SQL KULLANIMI
Ne hata verdiğini de yazsaydınız keşke.
C. Sunguray
csunguray at netbilisim.kom
Net Bilişim Hizmetleri
Sıradan her programcı bilgisayarın anlayabileceği kodlar yazabilir.
Sadece iyi programcılar insanların da anlayabileceği kodlar yazarlar.
Martin Fowler (http://martinfowler.com/)
csunguray at netbilisim.kom
Net Bilişim Hizmetleri
Sıradan her programcı bilgisayarın anlayabileceği kodlar yazabilir.
Sadece iyi programcılar insanların da anlayabileceği kodlar yazarlar.
Martin Fowler (http://martinfowler.com/)
Re: QUERY İLE SQL KULLANIMI
Hata olarak oranı tanımıyordu önüne (:) koyduktan sonra sorun düzeldi kodu aşağıdaki gibi değiştirdim
fakat şimdide sorgulama yapıyor ama doğru sonucu vermiyor.
dm.QGr_karsilastir.Close;
dm.QGr_karsilastir.SQL.Clear;
dm.QGr_karsilastir.SQL.Add('select * from QGramajKarsilastir where farkyuzde >= ran and tarih = :tar');
dm.QGr_karsilastir.Parameters.ParamByName('oran').Value:=edit1.Text;
dm.QGr_karsilastir.Parameters.ParamByName('tar').Value:=edit2.Text;
dm.QGr_karsilastir.Prepared:=true;
dm.QGr_karsilastir.Open;
fakat şimdide sorgulama yapıyor ama doğru sonucu vermiyor.
dm.QGr_karsilastir.Close;
dm.QGr_karsilastir.SQL.Clear;
dm.QGr_karsilastir.SQL.Add('select * from QGramajKarsilastir where farkyuzde >= ran and tarih = :tar');
dm.QGr_karsilastir.Parameters.ParamByName('oran').Value:=edit1.Text;
dm.QGr_karsilastir.Parameters.ParamByName('tar').Value:=edit2.Text;
dm.QGr_karsilastir.Prepared:=true;
dm.QGr_karsilastir.Open;
Re: QUERY İLE SQL KULLANIMI
tarihide veritabanındaki formatta gönder.
Bir kelimenin anlamını öğretsen bile yeter..