Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ADO MS Jet [D6, Jet]

shinus © (2004-03-04 15:13:00)
Делаю подряд несколько инсертов (Query.Execute), после чего сразу открываю Query - ни одной записи запрос не вернул. Повторяю запрос через несколько секунд - возвращаются все записи, которые добавил. В чем беда?

SPIRIT (2004-03-04 16:25:00) [1]
джеты разные бывают :)

shinus (2004-03-04 16:23:00) [2]
INTO погоды не делает, атавизм анси sql
JET стоит , без него бы даже свзяь с базой было бы не установить

SPIRIT (2004-03-04 16:15:00) [3]
код правильный с поправкой [10]
попробуй установить jet ... хотя фик знает

SPIRIT (2004-03-04 16:11:00) [4]
Insert into

shinus (2004-03-04 16:01:00) [5]
а смысл?
function TADOQuery.ExecSQL: Integer;
begin
InitializeMasterFields(Self);
Command.Execute(FRowsAffected, EmptyParam);
Result := FRowsAffected;
end;
где
property Command: TADOCommand read FCommand;

SPIRIT (2004-03-04 15:46:00) [6]
Insert через TAdoCommand попробуй ..

shinus (2004-03-04 15:43:00) [7]
Jet ядро Access то есть файлы с расширением *.mdb

SPIRIT (2004-03-04 15:36:00) [8]
а чё за база ?

shinus (2004-03-04 15:34:00) [9]
Его и использую, написал просто Execute.
Суть не в этом

shinus (2004-03-04 15:34:00) [10]
Записи вставляются, вопрос только в том, что доступны они становятся не сразу.

SPIRIT (2004-03-04 15:31:00) [11]
пробуй
query.ExecSql

shinus (2004-03-04 15:25:00) [12]
ну простой пример:
Query.SQL.Text := 'INSERT [TableName] (Field1, Field2) VALUES ("'+Value1+'","'+Value+'")';

Query.Excute;
Query.SQL.Text := 'SELECT * FROM TableName';
Query.Open;
// после этого Query.RecordCount = 0
// повторяем запрос через 10 секунд
Query.Open;
// после этого Query.RecordCount = 1

SPIRIT (2004-03-04 15:20:00) [13]
Беда в коде.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »