12.03.2013 16:09:22 tarih formatında arama yapmak

[forumsad]

arkadaşlar firebird tablomdaki tarih formatım 12.03.2013 16:09:22 şeklinde
ben bugünkü kayıtları getirmek istiyorum

sadece tarih formatına göre daha önce arama yapmıştım ama saat ve saniyeyi içine alan bir formatta gün araması hiç yapmadım

Kod: Tümünü seç

var
SQlCumle:AnsiString;
trh:string;
begin
try
trh:=DateToStr(Date);
DMoyunlar.IBQuery1.SQL.Clear;
DMoyunlar.IBQuery1.SQL.Add('select * from TBL_OYUNLAR where TARIH='+trh);
DMoyunlar.IBQuery1.Open;

DMoyunlar.DataSource1.DataSet:=DMoyunlar.IBQuery1;
frmGunSonu.DBGrid1.DataSource:=DMoyunlar.DataSource1;

yukardaki kod hata veriyor

bugünkü kayıtları nasıl getirebilirim

saygılarımla

[freeman35]

öncelikle müneccim olmadığımız belirtelim, hata ne? Bencil olmayın hatanızı uzatmadan detaylı şekilde yazarsanız, diğer sorunlarına cevap arayan arkadaşlarda daha kolay bulur.
programın ile db nin STRING tarih formatı uyuşmuyor, verdiği hatada bununla ilgilidir muhtemelen,
query lerde parametre kullanın, parambyname gibi
kolay gele

[forumsad]

hata:


saygılarımla

[unicorn64]

hata tarih değerinin doğrudan sql stringi içinde kullanılmasından kaynaklı, trh değişkenini quotedstr ile aktarabilirsiniz, ancak benim tavsiyem sorgularınızı parametreli oluşturup değerleri parametreyle aktarmanız...

ayrıca bugünkü kayıtları alabilmek için sorguda alanı CAST etmeniz gerek

[forumsad]

Kod: Tümünü seç

DMoyunlar.IBQuery1.SQL.Add('select * from TBL_OYUNLAR where TARIH>('''+trh+''')');

bu şekilde oldu kod çalıştı ..cast olayı nedir bilmiyorum araştıracağım hocam

saygılarımla

[unicorn64]

bu şekilde tablonda trh değişkeniyle belirttiğin tarihten büyük kayıt varsa onlar da gelir

[forumsad]

tarih-saat-saniye gurubu içinden aynı gün olan kayıtları nasıl çekeceğimi bilemiyorum tarihi 1 gün öncesine çekip öyle sorgulamak
aklıma geldi.

saygılarımla

[forumsad]

Kod: Tümünü seç

procedure TfrmGunSonu.Button1Click(Sender: TObject);
var
trh:string;
begin

trh:=DateToStr(Date)+' 00:00:00';
DMoyunlar.IBQuery1.SQL.Clear;
DMoyunlar.IBQuery1.SQL.Add('select * from TBL_OYUNLAR where TARIH>('''+trh+''')');
DMoyunlar.IBQuery1.Open;

DMoyunlar.DataSource1.DataSet:=DMoyunlar.IBQuery1;
frmGunSonu.DBGrid1.DataSource:=DMoyunlar.DataSource1;
end;

yukardaki şekilde işimi gördüm

unicorn64 hocam cast olayına araştırdım şimdilik benim bilği seviyemi aşıyor inşallah yakında

triğer -generators-procedures-storeprocedure konularında birkaç ders olsa süper olurdu.

saygılarımla