Пытаюсь выполнить sql запрос по вставке данных
INSERT INTO Some_Table (....

При запуске скрипта получаю ошибку Token unknown именно в самом начале.
Почему он не воспринимает INSERT ?

Этот же запрос помещаю в ScriptExecute IB_Expert-а всё выполняется без проблем ...
Блин, всю ночь просидел и так и не разобрался.

Гуру, выручайте !!!

А более полный код можно? Потому что пока формально всё правильно.

Цитата

А более полный код можно?

Ложу на форму TpFIBQuery
Обзываю его: TestInsertQuery
В свойстве SQL (TString) пишу:

INSERT INTO Some_Table (VAL1, VAL2, VAL3) VALUES(1, 2, 3);
INSERT INTO Some_Table (VAL1, VAL2, VAL3) VALUES(4, 5, 6);
INSERT INTO Some_Table (VAL1, VAL2, VAL3) VALUES(7, 8, 9);
...

Из приложения, по клику на кнопку, вызываю обработчик:

procedure TMainForm.Button1Click(Sender: TObject);
begin
 TestInsertQuery.ExecQuery;
end;

Компилю, кликаю по кнопке и получаю вышеописанную ошибку  
Some_Table есть и поля соответственно, коннект к базе производится при открытии приложения, транзакции тоже есть раздельны (чтение, запись)
Всё вроде есть, а не работает, хоть плачь ...

А TpFIBQuery поддерживает множественные запросы? Скорее всего нет, попытайся поставить только 1 Insert и запусти.

Vit

Цитата

А TpFIBQuery поддерживает множественные запросы? Скорее всего нет, попытайся поставить только 1 Insert и запусти.

Так, кажется проясняется
С одним запросом выполнилось !!!

И как его теперь сделать множественным ?

Сыр-бор начался с попыток выполнить запрос из файла *.sql

 TestInsertQuery.SQL.LoadFromFile(FileName);
 TestInsertQuery.ExecQuery;

Vit, подскажи пож-та, как мне научить запрос выполнять все строки, а не одну.

Я не знаю InterBase и его компоненты, если нет компонента, который способен выполнять серверные скрипты, то прийдётся выполнять квери по очереди - кстати я так обычно и делаю - времени занимает чуть больше, за то база не блокируется надолго, как при массивных кверях:

Код

var t:TStringList;      i:integer; ...  t:=TStringList.create;  t.LoadFromFile(FileName);  for i:=0 to t.count-1 do    begin      TestInsertQuery.SQL.text:=t[i];      TestInsertQuery.ExecQuery;    end;  t.free;

Vit
Очередное ОГРОМНОЕ спасибо !  ;)
Заработало.

Ты даже не знаешь как я рад, что есть такой замечательный форум, действительно СПЕЦИАЛИСТЫ и просто Люди !!!

Цитата

есть такой замечательный форум, действительно СПЕЦИАЛИСТЫ и просто Люди !!!

Стараемся