Не пойму я это 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;

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