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

Не пойму я это ADO   Найти похожие ветки 

← →
Кирилл_   (2002-11-15 16:00) [0]

Господа помогите начинающему с 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) [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;

---

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

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



Память: 0.45 MB
Время: 0.013 c