[Yura_S]

Запускаю в Делфи следующий код:

Код:

procedure TForm1.FormCreate(Sender: TObject);
begin
DecodeDate(Now,year,months,day);
Application.HintHidePause:=99999;
Form1.ADOQuery1.Active:=false;
DBGrid1.DataSource.DataSet.Last;
CB2:=ComboBox3.Items.Create;
ADOQuery2.Active:=False;
ADOQuery2.SQL.Text:='DELETE Продажи.*, Month(Продажи!дат) FROM Продажи WHERE (((Month(Продажи!дат))=10));';
ADOQuery2.Active:=True;
end;

пишет ошибку "текущий проводник не поддерживает возврат нескольких наборов записей в результате одной операции"
Подскажите пожалуста как можно обойти эту проблему

[Yurk@]

Код:

ADOQuery2.SQL.Text:='DELETE FROM Продажи WHERE (Month(Продажи!дат))=10';
ADOQuery2.ExecSQL;