oracle数据库表Fdate VARCHAR 2 类型的存时间,用DELPHI上的两个 DateTimePicker1 控件 做Between 查询 10
procedureTForm1.Button1Click(Sender:TObject);beginADOQuery1.SQL.Clear;ADOQuery1.SQL.A...
procedure TForm1.Button1Click(Sender: TObject);
begin
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('Select * from A Where Fdate Between ''' + DateToStr(FDateFrom.Date) + ''' And ''' + DateToStr(FDateTo.Date) + ''' ');
ADOQuery1.open;
end;
这样为何不行呢。请教大侠! 展开
begin
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('Select * from A Where Fdate Between ''' + DateToStr(FDateFrom.Date) + ''' And ''' + DateToStr(FDateTo.Date) + ''' ');
ADOQuery1.open;
end;
这样为何不行呢。请教大侠! 展开
2个回答
展开全部
你用to_date转一下格式(sql2005是可以把日期数数据放引号里,oracle里不行),也就类似于
ADOQuery1.SQL.Add('Select * from A Where Fdate Between to_date(''' + DateToStr(FDateFrom.Date) + ''',''yyyy-mm-dd hh24:mi:ss'') And to_date(''' + DateToStr(FDateTo.Date) + ''',''yyyy-mm-dd hh24:mi:ss'') ');
注:我不太清楚默认的datetostr是什么格式,你要自己确定一下然后更改to_date后的格式符,或者在delphi中用TFormatSettings来指定datetostr的格式。
ADOQuery1.SQL.Add('Select * from A Where Fdate Between to_date(''' + DateToStr(FDateFrom.Date) + ''',''yyyy-mm-dd hh24:mi:ss'') And to_date(''' + DateToStr(FDateTo.Date) + ''',''yyyy-mm-dd hh24:mi:ss'') ');
注:我不太清楚默认的datetostr是什么格式,你要自己确定一下然后更改to_date后的格式符,或者在delphi中用TFormatSettings来指定datetostr的格式。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询