关于在delphi语言中使用SQL语句查询的问题
我的任务是将一个原数据库为access的管理软件的数据库更改为SQLServer2000.原程序代码如下:beginclose;sql.Clear;sql.Add('se...
我的任务是将一个原数据库为access的管理软件的数据库更改为SQL Server 2000.
原程序代码如下:
begin
close;
sql.Clear;
sql.Add('select RNumber from T_DepotDetail where Pccode in (select Pccode from T_Depot where AddDate>=:a and AddDate <=:b and InorOut=:c and CustName=:d) and GoodsName=:e');
parameters.ParamByName('a').Value:=StartTime;
parameters.ParamByName('b').Value:=OverTime;
parameters.ParamByName('c').Value:='入库';
parameters.ParamByName('d').Value:=combobox1.Text;
parameters.ParamByName('e').Value:=ADOquery2.Fields[0].AsString;
open;
end;
这样的程序运行后没有查询结果,应该怎样修改?
谢谢 展开
原程序代码如下:
begin
close;
sql.Clear;
sql.Add('select RNumber from T_DepotDetail where Pccode in (select Pccode from T_Depot where AddDate>=:a and AddDate <=:b and InorOut=:c and CustName=:d) and GoodsName=:e');
parameters.ParamByName('a').Value:=StartTime;
parameters.ParamByName('b').Value:=OverTime;
parameters.ParamByName('c').Value:='入库';
parameters.ParamByName('d').Value:=combobox1.Text;
parameters.ParamByName('e').Value:=ADOquery2.Fields[0].AsString;
open;
end;
这样的程序运行后没有查询结果,应该怎样修改?
谢谢 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询