收录日期:2019/03/26 02:56:58 时间:2016/05/31 07:15:35 标签:非技术区
我想查找以“入库日期”为区间的商品数据,而写了以下程序:
procedure TForm1.Button1Click(Sender: TObject);
var
date1,date2:TdateTime;
begin
date1:=strtodate(MaskEdit1.Text);//存放开始日期值,接收MaskEdit1.Text的值
date2:=strtodate(MaskEdit2.Text);//存放结束日期值,接收MaskEdit2.Text的值

with query1 do
begin
close;
sql.Clear;
query1.SQL.Add('select * from tab1 where 入库日期 >:A and 入库日期<:B');
query1.ParamByName('A').AsDate:=date1;
query1.ParamByName('B').Asdate:=date2;
open;
end;
end;

这段程序能轻易通过编译,但在运行时输入正确的查询日期却出现以下错误:
'ODBC Microsoft Access Driver:时间日期格式无效(null)'
明明用strtodate函数转换了格式,怎么会有这种错误呢?

再想问一下ADOQQuery怎么没有和Query.ParamByName的方法,ADOQQuer有没有类似Query.ParamByName的方法呢?
with query1 do
begin
close;
sql.Clear;
query1.SQL.Add('select * from tab1 where 入库日期 >:A and 入库日期<:B');
query1.ParamByName('A').value:=date1;
query1.ParamByName('B').value:=date2;
open;
end;
with query1 do
begin
close;
sql.Clear;
query1.SQL.Add('select * from tab1 where 入库日期 >:A and 入库日期<:B');
query1.ParamByName('A').value:=date1;
query1.ParamByName('B').value:=date2;
open;
end;

这段代码能解决了部分问题,但是却出现了不正确的结果。
sql语句没有写对吧,先在sql查询分析器里试一下
with query1 do
begin
  close;
  sql.Clear;
  SQL.Add('select * from tab1 where (入库日期 >:A) and (入库日期<:B)');
  ParamByName('A').value:=date1;
  ParamByName('B').value:=date2;
  prepare ;
  open;
end;
在ADO里是这样  写的:
query1.Parameters.ParamByName('B').Value:=date2;

建议你用TDateTimePicker!

procedure TForm1.Button1Click(Sender: TObject);
var
date1,date2:TdateTime;
begin
date1:=DateTimePicker1.DateTime;
date2:=DateTimePicker2.DateTime;

with query1 do
begin
close;
sql.Clear;
query1.SQL.Add('select * from tab1 where 入库日期 >:A and 入库日期<:B');
query1.ParamByName('A').AsDate:=date1;
query1.ParamByName('B').Asdate:=date2;
open;
end;
end;
以上各位的代码都试了,查询结果还是达不到预期的效果。请问TDateTimePicker组件在哪个面板可以找到。
看组件面版上的鼠标提示啊

jasperReport ,用过的来帮个忙 如何动态分配一个数组,并打印这个数组。 求一正则表达式写法开头结尾固定,在线等…… 帮忙看下代码,很郁闷,修改打卡机数据库 新消息提示是怎么做的?? 关于wap 2.0开发…………急!!!在线等。 jsp中用plugin的标签,找不到那个类,请教下~ VxWorks 产生硬件中断 LinqDataSource.Where中如何使用Contains查询包含双引号的条件 关于对话框分层显示的问题 请各位大虾帮我看一下! 只读字段只能在类的析构函数中赋值。 pb 用什么控件可以显示类似word的图文混编的文档? 用webbroswer打开网页后如何保存验证码图片到本机上?高分求 简单BBS揭示版de数据库设计问题 辞职了~散点分!! 美萍会员管理系统破解版 急急急急急急急急。。。求《现代操作系统》中文版,陈向群等翻译 这个C#模板的程序哪里错了?高手帮忙改一下 菜鸟问题:如何跨CPP调用函数 请教一个关于正则表达示替换内容的问题 请帮忙看一下,有几个小问题。 谁帮我解释一下关于trunk的问题? 关于响应ActiveX控件事件的问题 求用编程来解决实现文件夹相应的功能? 关闭页面调用方法问题 linux 下子线程不能执行的问题? 谁知道咋在iSeries上创建用户组啊? 我写了个c++程序,调用了python。如何发布这样的程序? 自定义消息传送字符串