Question

delphi里查询数据库结果是空的，实际应该有数据

qryNumber.SQL.Add('select IntraLabelNo,TeamNumber from OrderRec ');
qryNumber.SQL.Add('where (PrintDT between :P0 and dateadd(second,1,:P0)) and printed=1 and PrintNo=:P1');
qryNumber.Parameters.ParamByName('P0').Value:=FormatDateTime('yyyy-mm-dd hh:nn:ss',time);
这几句有什么问题吗，为什么查到的结果是空的？

Answer 1

不同的数据库对时间的表述格式不同，你也没交代用的什么数据库：
Access ：DATEADD('second', 1, #2013-01-04#)
MS SQL：DATEADD(second, 1, '2013-01-04')
你的时间参数P0也要改成下面的样子：
qryNumber.Parameters.ParamByName('P0').Value := '#' + FormatDateTime('yyyy-mm-dd hh:nn:ss',time) + '#'
qryNumber.Parameters.ParamByName('P0').Value := '''' + FormatDateTime('yyyy-mm-dd hh:nn:ss',time) + ''''

追问

是SQL　Server，你的方法试了一下，报错了

追答

先别提报不报错，你先告诉我你用的是什么数据库？！！！说了半天我白说了。

追问

MS SQL

追答

qryNumber.SQL.Add('select IntraLabelNo,TeamNumber from OrderRec ');
qryNumber.SQL.Add('where (PrintDT between :P0 and dateadd(second,1,:P0)) and printed=1 and PrintNo=:P1');
qryNumber.Parameters.ParamByName('P0').Value:= '''' + FormatDateTime('yyyy-mm-dd hh:nn:ss',time) + '''';
这样报错么？

追问

会，报错“应用程序在当前操作中使用了错误类型值”

追答

qryNumber.SQL.Add('select IntraLabelNo,TeamNumber from OrderRec where (PrintDT between :P0 and dateadd(second,1,:P0)) and printed=1 and PrintNo=:P1');
qryNumber.Parameters.ParamByName('P0').Value:= FormatDateTime('yyyy-mm-dd hh:nn:ss',time);
ShowMessage(qryNumber.SQL[0]);
你对比一下对话框的内容和你要正确执行的SQL内容是否一致。另外，SQL语句最后是不是还要加'GO'。

追问

是一致的，我再看看其他的，谢谢你了

追答

那可能是其它部分的问题，你再看看。
另外建议连接SQL Server用ADO组件，BDE那玩意不靠谱。

Answer 2

你把sql文加上你传的值到数据库执行一下就知道了

追问

试过了，在SQL Server里面可以查到内容，delphi里面这个就不行了