简单的日期查询出错!
错误:''项目在所需要的名称和序数中示被发现''
.
我在其它的有的电脑上调用我的sqlserver没问题,怪不怪.有一些电脑近来就是有
这个问题,
从现在开始装WINDOWS都是有这个问题。 假设有Q1(adotable1) 内有字段ttcode(char 6),ttname(char6),ttdate(datetime)
做一个简单的日期查询,用到datetimepick控件分别叫dp1,dp2.
button内的代码
procedure TForm1.Button2Click(Sender: TObject);
var
str:string;
begin
with Q1 do begin
if active then close;
if datetostr(dp1.Date)>'' then
str:=' TTDATE>='''+datetostr(dp1.date)+'''';
if datetostr(dp2.Date)>'' then
str:=str+ ' and TTDATE<='''+datetostr(dp1.date)+''''; filter:=str;
Q1.Open;
end;
end;end.
当点击它时出现 '' 项目在所需要的名称和序数中示被发现''
短日期格式:yyyy-MM-dd
错误:''项目在所需要的名称和序数中示被发现''
.
我在其它的有的电脑上调用我的sqlserver没问题,怪不怪.有一些电脑近来就是有
这个问题,
从现在开始装WINDOWS都是有这个问题。 假设有Q1(adotable1) 内有字段ttcode(char 6),ttname(char6),ttdate(datetime)
做一个简单的日期查询,用到datetimepick控件分别叫dp1,dp2.
button内的代码
procedure TForm1.Button2Click(Sender: TObject);
var
str:string;
begin
with Q1 do begin
if active then close;
if datetostr(dp1.Date)>'' then
str:=' TTDATE>='''+datetostr(dp1.date)+'''';
if datetostr(dp2.Date)>'' then
str:=str+ ' and TTDATE<='''+datetostr(dp1.date)+''''; filter:=str;
Q1.Open;
end;
end;end.
当点击它时出现 '' 项目在所需要的名称和序数中示被发现''
短日期格式:yyyy-MM-dd
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货