ACCESS数据库"记录日期"是'短日期'型的,就是****-**-**.
语句
query1.SQL.Clear;
query1.SQL.Add('insert into 总览表 values(:当日花费总金额,:记录人,:记录日期)') ;
query1.ParamByName('当日花费总金额').AsString := edit1.Text;
query1.ParamByName('记录人').AsString := combobox1.Text;
query1.ParamByName('记录日期').AsDate := datetimepicker1.Date;
query1.ExecSQL;
最后那个日期谁帮我看看,我卡了两天了
语句
query1.SQL.Clear;
query1.SQL.Add('insert into 总览表 values(:当日花费总金额,:记录人,:记录日期)') ;
query1.ParamByName('当日花费总金额').AsString := edit1.Text;
query1.ParamByName('记录人').AsString := combobox1.Text;
query1.ParamByName('记录日期').AsDate := datetimepicker1.Date;
query1.ExecSQL;
最后那个日期谁帮我看看,我卡了两天了
方法1:改WINDOWS的日期时间格式 为没有“上午”“下午”---需要每一台电脑都要设置
方法2:query1.ParamByName('记录日期').AsDate := datetimepicker1.Date;
改为
query1.ParamByName('记录日期').AsString := formatdatetime('yyyy-mm-dd',datetimepicker1.Date);
SQL.Add('select * from fjzd where');
SQL.Add('((sdata>=#' + FormatDateTime('yyyy-MM-dd', fjzdcxf.DateTimePicker1.Date) + '# and sdata<=#' + FormatDateTime('yyyy-MM-dd', fjzdcxf.DateTimePicker2.date) + '#) and fqrname like ''%' + fjzdcxf.cxedit.Text + '%'') order by sdata');
Open;
我写的这个是查询语句,和你那个不同
但是日期的都是一样的,
上网查一下就知道了