| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Не пойму я это ADO

Кирилл_ ©   (2002-11-15 16:00:00) 

Господа помогите начинающему с ADO, пожалуйста.
Есть вот код в DELPHI 6

ADOConnection1.ConnectionString:="Provider=MSDAORA.1;User ID=tkg;Data Source=tkg;Persist Security Info=False";
for i:=8 to 15 do
.
.
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add("INSERT INTO TRUNKGROUPS1 (comm_id,dev_id,tkg_name)");
ADOQuery1.SQL.Add("VALUES (:c1,:c2,:c3)");
ADOQuery1.Parameters[0].Value:=c1;
ADOQuery1.Parameters[1].value:=c2;
ADOQuery1.Parameters[2].value:=c3;
ADOQuery1.ExecSQL;
ADOQuery1.Close;
end;

1. при компиляции:
Выдается , что произошла ошибка для которой невозможно загрузить сообщение из ORACLE.
2.если запустить exe , то программа виснет , но заливается только одна запись.

Может в коде чего неправильно.
Зараннее спасибо

---

sniknik   (2002-11-15 16:10:00) [1]

попробуй заменить код
for i:=8 to 15 do begin
ADOCommand.CommandText:= "INSERT INTO TRUNKGROUPS1(comm_id,dev_id,tkg_name)VALUES (:c1,:c2,:c3)");
ADOCommand.Parameters[0].Value:=c1;
ADOCommand.Parameters[1].value:=c2;
ADOCommand.Parameters[2].value:=c3;
ADOCommand.Execute;
end;

---

Наверх