帮我看看那里错了!

icecsdn 2002-07-03 11:35:54
我想从数据库中取出日期和当前日期相等,并且时间在给定的一个范围内的数据。
字段zhudian应该在两个时间段之间。
var s:String;
n1,n2 : TParameter;
s:string

s:='select * from t1 where (nowdate=#'+Datetostr(date)+'#) and (zhudian >=n1) and (zhudian<=:n2)';
with adoquery1 do
begin
Close;
SQL.Clear;
SQL.Add(s);
Parameters.parambyname('n1').value:=strtodate('91-8-1');
Parameters.parambyname('n2').value:=strtodate('93-2-1');
open;
end;
...全文
76 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
johnsonrao 2002-07-11
  • 打赏
  • 举报
回复
s:='select * from t1 where (nowdate=:n3) and (zhudian >=:n1) and (zhudian<=:n2)';
with adoquery1 do
begin
Close;
SQL.Clear;
SQL.Add(s);
Parameters.parambyname('n1').asdatetime:=strtoTime('9:00:00');
Parameters.parambyname('n2').asdatetime:=strtoTime('18:00:00');
Parameters.parambyName('n3').asdatetime:=date;
open;
end;
johnsonrao 2002-07-11
  • 打赏
  • 举报
回复
s:='select * from t1 where (nowdate=:n0) and (zhudian >=:n1) and (zhudian<=:n2)';
with adoquery1 do
begin
Close;
SQL.Clear;
SQL.Add(s);
Parameters.parambyname('n1').asdatetime:=strtoTime('9:00:00');
Parameters.parambyname('n2').asdatetime:=strtoTime('18:00:00');
Parameters.parambyName('n3').asdatetime:=date;
open;
end;
xfgncit98 2002-07-10
  • 打赏
  • 举报
回复
为什么不再设一个Tparameter型变量n3
s:=s:='select * from t1 where (nowdate = n3) and (zhudian >=n1) and (zhudian<=:n2)';
with adoquery1 do
begin
Close;
SQL.Clear;
SQL.Add(s);
Parameters.parambyname('n1').asdatetime:=strtodate('9:00:00');
Parameters.parambyname('n2').asdatetime:=strtodate('18:00:00');
Parameters.parambyName('n3').asdatetime:=date;
open;
end;

zhptj 2002-07-10
  • 打赏
  • 举报
回复
var s:String;
n1,n2 : TParameter;
s:string
ss:string;
ss:='#'+Datetostr(date)+'#';

s:='select * from t1 where nowdate=:zz) and zhudian >=:n1 and zhudian<=:n2';
with adoquery1 do
begin
Close;
SQL.Clear;
SQL.Add(s);
Parameters.parambyname('zz').asstring:=ss;
Parameters.parambyname('n1').asdatetime:=strtodate('9:00:00');
Parameters.parambyname('n2').asdatetime:=strtodate('18:00:00');
open;
end;
icecsdn 2002-07-10
  • 打赏
  • 举报
回复
谁知道啊?
icecsdn 2002-07-10
  • 打赏
  • 举报
回复
谁能解决啊?
icecsdn 2002-07-10
  • 打赏
  • 举报
回复
谁能解决啊?
movingboy 2002-07-03
  • 打赏
  • 举报
回复
1)s:=......一句中的#应该替换为两个单引号
2)n1前好像少了一个冒号
icecsdn 2002-07-03
  • 打赏
  • 举报
回复
什么意思?
naughtyboy 2002-07-03
  • 打赏
  • 举报
回复
s:='select * from t1 where (nowdate=#'+Datetostr(date)+'#) and (zhudian >=:n1) and (zhudian<=:n2)';
nowdate=#'+Datetostr(date)+'#这里也换一下
icecsdn 2002-07-03
  • 打赏
  • 举报
回复
上面写错了
我想从数据库中取出日期和当前日期相等,并且时间在给定的一个范围内的数据。
字段zhudian应该在两个时间段之间。
var s:String;
n1,n2 : TParameter;
s:string

s:='select * from t1 where (nowdate=#'+Datetostr(date)+'#) and (zhudian >=n1) and (zhudian<=:n2)';
with adoquery1 do
begin
Close;
SQL.Clear;
SQL.Add(s);
Parameters.parambyname('n1').asdatetime:=strtodate('9:00:00');
Parameters.parambyname('n2').asdatetime:=strtodate('18:00:00');
open;
end;

5,392

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧