Вставка записи в БД, если ее там нет.

[Mixasik]

Здравствуйте. Я подключаюсь БД dbf из delphi посредством ADOQuery через OLE DB Provider for FoxPro. Так вот у меня например если в БД запись шде pole1=1 pole2=1 pole3=1 и мне надо вставить запись и если запись равна
pole1=1 pole2=1 pole3=1 то есть уже есть в БД мне ее вставлять не надо. Подскажите SQL запрос для этого?

[soleil@mmc]

кагтотаг

query1.close;
query1.SQL.Text := 'select count(1) as cnt from your_table where pole1=1 and pole2=1 and pole3=1';
query1.Open;
if query1.FieldByName('cnt').AsInteger = 0 then 
begin
  /*
  блок вставки записи в таблицу
  */
end;

при желании параметризовать запрос

[Mixasik]

Насчет так проверить это конечно вариант, но я надеялся можно обычным запросом выполнить? Всмысле одним запросом. Проверить существование записи в запросе и если ее нет - вставить.

[Serge_Bliznykov]

нет, к сожалению, одной командой это сделать не получится.
Классический SQL (insert into ) это не позволяет.
Поэтому - сначала проверять, потом - вставлять.

p.s. А чем Вам проверка не угодила?

[Mixasik]

Ясненько. Да ничем в общем то - хотелось попроще сделать. Спасибо понятно