我用的是ODAC中的OraQuery控件进行Oracle数据库查询是偶尔会弹出OCI_NO_DATA这个错误,但单独调试时又正常,不知道这个错误是什么原因造成的,下面是源代码,请大家不吝指教
try
with tmOraQuery do
begin
Active:=False;
SQL.Clear;
SQL.Text:='select /*+index(ydqinfo ydq_ydqbh_index)*/ * from ydqinfo where ydq_bh like ''%'+ydq_bh+'%''';
Active:=True;
if RecordCount > 0 then
begin
ydq_tlj:= FieldByName('tlj').AsString;
ydq_xlm:= FieldByName('ydq_xlm').AsString;
end;
end;
except
on E: Exception do
begin
ShowMessage(e.Message);
end;
end;
try
with tmOraQuery do
begin
Active:=False;
SQL.Clear;
SQL.Text:='select /*+index(ydqinfo ydq_ydqbh_index)*/ * from ydqinfo where ydq_bh like ''%'+ydq_bh+'%''';
Active:=True;
if RecordCount > 0 then
begin
ydq_tlj:= FieldByName('tlj').AsString;
ydq_xlm:= FieldByName('ydq_xlm').AsString;
end;
end;
except
on E: Exception do
begin
ShowMessage(e.Message);
end;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货