ADODatset ile iki tarih arası sorgulama sorunu

[ahmethakan]

vari tabanı MSSQL tutulan tarih örnegi 10.10.2005 12:23:10 sorugulama kodu aşağıda verilmiştir. bir türlü iki tarih arasını sorgulatamadım çözüm nedir?

Kod: Tümünü seç

procedure TForm1.BitBtn7Click(Sender: TObject);
var
Tarih1, Tarih2 : TDate;
begin
  Dm.ADOOgrNufBil.Close;
  Dm.ADOOgrNufBil.CommandText:='Select * From PersonelKursBilgi where CreateDate Between :TARIH1 and :TARIH2';
  Dm.ADOOgrNufBil.Parameters.ParamByName('TARIH1').Value :=strtodate(edit12.text);
  Dm.ADOOgrNufBil.Parameters.ParamByName('TARIH2').Value :=strtodate(edit27.text);
  Dm.ADOOgrNufBil.Open;
**********************************
Begin
  Dm.ADOOgrNufBil.Close;
  Dm.ADOOgrNufBil.CommandText:='Select * From PersonelKursBilgi where CreateDate between''' + maskEdit1.Text+ ''' and  ''' + MaskEdit2.Text + '''';
  Dm.ADOOgrNufBil.Open;

*********************************************************
  
  Dm.ADOOgrNufBil.Close;
  Dm.ADOOgrNufBil.CommandText:='Select * From PersonelKursBilgi where CreateDate>=:iltarih and CreateDate<=:sontarih';
  Dm.ADOOgrNufBil.Parameters.ParamByName('ilktarih').Value:=tar1;
  Dm.ADOOgrNufBil.Parameters.ParamByName('sontarih').Value:=MaskEdit2.Text;
  Dm.ADOOgrNufBil.Open;

yukarıdaki tarih sorgulamalarının hepsindede

Project yonetimprog.exe raised exception class EDatabaseError with message 'ADOOgrNufBil: Field 'ID' not
dount'. Process stopped. Use tep or Run to continue.

hata mesajı veriyor

[aLonE CoDeR]

Selamlar.
ID adındaki alanın olmadığını söylüyor.

- Daha önce ID alanının olduğu ancak sonradan silinmediğinden emin olun.

- Dataset nesnesinin fieldlistinde böyle bir karışıklığın söz konusu olup olmadığını kontrol edin.

- Ek olarak Database nesnesini Disconnect edip tekrar Connect olun ve FieldList'i tekrar kontrol edin.

Kolay gele.

[mucar]

Evet bLue aLonE haklı. ADOOgrNufBil'e çift tıklayıp id alanını silin.

[ahmethakan]

Dbgrid'de iki tarih arası sorgulama çözümü MsSQL

Kod: Tümünü seç

procedure TForm1.BitBtn7Click(Sender: TObject);
begin
 Dm.ADOOgrNufBil.Close;
 Dm.ADOOgrNufBil.CommandText:='Select * From OgrenciNufusBilgi where CreateDate  between''' + maskbast.Text+ ''' and  ''' + Maskbitt.Text + '''';
 Dm.ADOOgrNufBil.Open;
end;

[ahmethakan]

Dbgrid'de iki tarih arası sorgulama çözümü MsSQL
Dbgridde Id alanını silmişim o yüzden sorgulama yapamıyormuşum. dbgrid'i silip yeniden oluşturduktan sonra sorgulama sorunsuz çalıştı..

Kod: Tümünü seç

procedure TForm1.BitBtn7Click(Sender: TObject);
begin
 Dm.ADOOgrNufBil.Close;
 Dm.ADOOgrNufBil.CommandText:='Select * From OgrenciNufusBilgi where CreateDate  between''' + maskbast.Text+ ''' and  ''' + Maskbitt.Text + '''';
 Dm.ADOOgrNufBil.Open;
end;