Скачать: CL | DM;

ADO MS Jet   Найти похожие ветки 

← →
shinus ©   (2004-03-04 15:13) [0]

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

---

← →
SPIRIT ©   (2004-03-04 15:20) [1]

Беда в коде.

---

← →
shinus ©   (2004-03-04 15:25) [2]

ну простой пример:
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:31) [3]

пробуй
query.ExecSql

---

← →
shinus ©   (2004-03-04 15:34) [4]

Его и использую, написал просто Execute.
Суть не в этом

---

← →
shinus ©   (2004-03-04 15:34) [5]

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

---

← →
SPIRIT ©   (2004-03-04 15:36) [6]

а чё за база ?

---

← →
shinus ©   (2004-03-04 15:43) [7]

Jet ядро Access то есть файлы с расширением *.mdb

---

← →
SPIRIT ©   (2004-03-04 15:46) [8]

Insert через TAdoCommand попробуй ..

---

← →
shinus ©   (2004-03-04 16:01) [9]

а смысл?
function TADOQuery.ExecSQL: Integer;
begin
 InitializeMasterFields(Self);
 Command.Execute(FRowsAffected, EmptyParam);
 Result := FRowsAffected;
end;
где
property Command: TADOCommand read FCommand;

---

← →
SPIRIT ©   (2004-03-04 16:11) [10]

Insert into

---

← →
SPIRIT ©   (2004-03-04 16:15) [11]

код правильный с поправкой [10]
попробуй установить jet ... хотя фик знает

---

← →
shinus ©   (2004-03-04 16:23) [12]

INTO погоды не делает, атавизм анси sql
JET стоит , без него бы даже свзяь с базой было бы  не установить

---

← →
SPIRIT ©   (2004-03-04 16:25) [13]

джеты разные бывают :)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.022 c