我用datetimepicker的日期插入到sqlserver7.0的表中,表中的日期竟然是1905年,怎么会这样呢?我用了一个adoconnection,adoquery,adotable,datasource,dbgrid
我的代码是这样写的:
procedure TForm1.Button1Click(Sender: TObject);
begin
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('insert into course_info(cou_name,cou_no,cou_date)values(');
adoquery1.SQL.Add
(#39+edit1.text+#39+','+#39+edit2.Text+#39+','+datetostr(datetimepicker1.date)+')');
adoquery1.ExecSQL;
adotable1.Requery();
end;
我是不是有哪写的不对,还是在设置上有什么不对的。
我在win2000中的控制面板中的改了短日期。
请大家帮忙解决一下。
我的代码是这样写的:
procedure TForm1.Button1Click(Sender: TObject);
begin
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.Add('insert into course_info(cou_name,cou_no,cou_date)values(');
adoquery1.SQL.Add
(#39+edit1.text+#39+','+#39+edit2.Text+#39+','+datetostr(datetimepicker1.date)+')');
adoquery1.ExecSQL;
adotable1.Requery();
end;
我是不是有哪写的不对,还是在设置上有什么不对的。
我在win2000中的控制面板中的改了短日期。
请大家帮忙解决一下。
解决方案 »
- delphi 7调用Java axis2写的webservice,本机开发环境下可以使用了,换台机器就行了?
- teechart中标志说明浮点控制
- KeyUp 与Messagebox 问题
- 在输入窗体中,使回车键代替TAB键,我的代码为什么无法通过?(高手请帮忙)
- 在Delphi的SQL Explore环境中的排序问题
- 请问怎么写程序更改本机时间!
- 100分!!!哪位告诉我在哪下载reportbuilder for delphi6.0
- 用DELPHI编的屏保在98中出现的问题
- 关于ISAPI,请高手指点!!!不胜感激!!!!!!
- 打抱程序时怎么携带fonts 文件?
- 很简单的问题,要分的来
- 我想做一个自动聊天的程序,大家看现实吗?做QQ 或 MSN 的插件?
adoquery1.SQL.Add
(''''+edit1.text+''','''+edit2.Text+''','''+datetostr(datetimepicker1.date)+''')');
--date也要加引号
(#39+edit1.text+#39+','+#39+edit2.Text+#39+','+#39+datetostr(datetimepicker1.date)+#39+')');
sql.add('select * from yourtable where yourdatefield = ' + QuotedStr(DateToStr(Now));