[blsh]

Код:

ADOConnection1.BeginTrans;
ADOQuery1.Close;
ADOQuery1.SQL.Clear;

ADOQuery1.SQL.Text:='INSERT INTO Barcodes_File(Barcode, Index_To, Country, Files_Name, DateTimes) SELECT '+QuotedStr(sID)+','+QuotedStr(sIndexTo)+','+QuotedStr(sMailDer)+','+QuotedStr(FileName)+','+QuotedStr(DateTimeToStr(Now))+' WHERE NOT EXISTS (SELECT 1 FROM Barcodes_File WHERE Barcode = '+QuotedStr(sID)+' and Files_Name = '+QuotedStr(FileName)+')';

ADOQuery1.ExecSQL;
ADOConnection1.CommitTrans;

вот так я посылаю запрос к базе