在Delphi 里,请教了(50分)

C

chinaluo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-17

• #1

大家好,
我的这个问题是这样的,
我的ACCESS数据库加DELPHI中的时间不知怎样构造成SQL语句,请大家帮我一个忙.
sql1:='select distinct bookid from buy ';
sql1:=sql1+'where buydate<= '+buydatedatetostr( DateTimePicker1.Date);

怎样才对，，

 

K

KOKS

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-17

• #2

sql1:='select distinct bookid from buy ';
sql1:=sql1+'where buydate<='''+datetostr( DateTimePicker1.Date)+'''';

 

X

xue_anan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-17

• #3

sql1:=sql1+'where buydate<= '''+buydatedatetostr( DateTimePicker1.Date)'''';

 

T

twos

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-17

• #4

query1.sql.add('select ... where buydate<=:');
query1.params[0].asdatetime:=datetimepicker1.date;
或者sql1:=sql1+'where buydate<= ''#'+buydatedatetostr( DateTimePicker1.Date)+'#''';

 

无

无疯无禄

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-17

• #5

sql1:='select distinct bookid from buy ';
sql1:=sql1+'where buydate<=:VarDate';
Query1.Sql.Add(Sql)
Query1.Sql.ParamsByName('VarDate').AsDate:=DateTimePicker1.Date;
Query1.Oper;

 

C

chinaluo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-19

• #6

好了