Y
yytxt
Unregistered / Unconfirmed
GUEST, unregistred user!
我写了如下一段代码:
var
FileNum: integer;
begin
with ADOQuery1 do
begin
Close;
with SQL do
begin
Clear;
Add('SELECT *');
Add('FROM tablename');
Add('WHERE (ChanName = :CN) and (R_STime<>NULL) and (R_RTime = NULL)');
Parameters.Items[0].Value:='RJTD';
Prepared;
Open;
end;
FileNum := RecordCount;
end;
end;
我连的是Access数据库,而且通过查询得到表中符合条件的有3条纪录,可是为什么上面代码执行时得到的结果却是0呢?
请各位高手帮忙。
另外,为什么我用ParamByName('CN').AsString := 'RJTD';代替Parameters.Items[0].Value:='RJTD';时编译出错呢?
var
FileNum: integer;
begin
with ADOQuery1 do
begin
Close;
with SQL do
begin
Clear;
Add('SELECT *');
Add('FROM tablename');
Add('WHERE (ChanName = :CN) and (R_STime<>NULL) and (R_RTime = NULL)');
Parameters.Items[0].Value:='RJTD';
Prepared;
Open;
end;
FileNum := RecordCount;
end;
end;
我连的是Access数据库,而且通过查询得到表中符合条件的有3条纪录,可是为什么上面代码执行时得到的结果却是0呢?
请各位高手帮忙。
另外,为什么我用ParamByName('CN').AsString := 'RJTD';代替Parameters.Items[0].Value:='RJTD';时编译出错呢?