Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add('SELECT * from main');
query1.Sql.Add('where rolecode = '''+rolecode.AsString+'''' );
if ComboBox3.Text<>'' then
Query1.SQL.Add('AND nsmc='''+ComboBox3.Text+'''');
if ComboBox4.Text<>'' then
Query1.Sql.Add('AND qiyecode='''+ComboBox4.Text+'''');
Query1.Sql.Add(' AND date between '''+
FormatDateTime('YYYY"-"MM"-"DD', DateTimePicker1.Date) +''' and '''+
FormatDateTime('YYYY"-"MM"-"DD', DateTimePicker2.Date) + '''');
query1.open;
如果不加日期条件是对的,但加了日期条件后,编译过了,但运行的时候它说form子句有错无,不知道为什么?我的数据库是access,这个语句在sqlserver下编译运行没有问题?
Query1.Sql.Clear;
Query1.Sql.Add('SELECT * from main');
query1.Sql.Add('where rolecode = '''+rolecode.AsString+'''' );
if ComboBox3.Text<>'' then
Query1.SQL.Add('AND nsmc='''+ComboBox3.Text+'''');
if ComboBox4.Text<>'' then
Query1.Sql.Add('AND qiyecode='''+ComboBox4.Text+'''');
Query1.Sql.Add(' AND date between '''+
FormatDateTime('YYYY"-"MM"-"DD', DateTimePicker1.Date) +''' and '''+
FormatDateTime('YYYY"-"MM"-"DD', DateTimePicker2.Date) + '''');
query1.open;
如果不加日期条件是对的,但加了日期条件后,编译过了,但运行的时候它说form子句有错无,不知道为什么?我的数据库是access,这个语句在sqlserver下编译运行没有问题?
解决方案 »
- 手动向stringgrid中输入数据,怎样保存到数据库?给个实例
- oracle的连接查询
- 如何实现"Setup.exe在线安装"?(期待有解.............)
- Delphi7没有智能感应?
- 请问TeditPanel是什么控件来的??那里有下载????
- Access数据库中如何找出重复的记录?
- 以前的<资料收集器>更新啦,还是献给这里的所有网友
- 请问:MessageDlg()按扭能用中文显示吗?
- oncreate事件
- 可以对DELPHI及C++Builder整个工程进行简繁体中文转换的软件!!
- 有关客户端连接服务器的问题,困扰我好久了,希望高手帮下忙快死人了,叫甲方逼死了快.
- suv车是什么意思,究竟它是越野车还是吉普车
不是这样用的 FormatDateTime('YYYY"-"MM"-"DD', DateTimePicker1.Date)
"where 日期时间 > #2003-07-10#"
而且Formatdatatime用的不对
with adoquery1 do
begin
close;
sql.text:='select * from main where date between #'+datetostr (datetimepicker1.date)+'#'+' and #'+datetostr(datetimepicker2.date)+'#';
open;
end;
#'+datetostr(DateTimePicker1.Date) +'#'+''' and '''+
#'+datetostr( DateTimePicker2.Date)+'#' + '''');
改成这样了,怎么还是不对哦
'#'+datetostr(DateTimePicker1.Date) +'#'+' and '+
'#'+datetostr( DateTimePicker2.Date)+'#');不要三个'号