我用ADOQuery组件查询access数据库怎么有时对有时报错啊？

很奇怪的问题
当我用ADOQuery组件查询时，用到下面的代码：
with frmMain.ADO_Query do
  begin
    if Active then Close;
    Prepared := False;
    Sql.Clear;
    Sql.Add('Select * from DECINFO where LZBS = ''' + edtDeviceID.Text + ''''  );
    Open ;
  end;
但是有的时候，程序执行到if active then Close这句时，会报：
BOF或EOF中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
这是怎么回事啊？
有的时候又不出现这个错误。
我用的数据库是access，我用ADOConnetion组件和数据库建立连接，然后ADOQuery组件与ADOConnection相关联。