Вниз
Скачать: 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.014 c
1-14662
kingdom
2002-11-22 18:18
2002.12.05
Как распознать COM?


7-14824
saf
2002-10-01 19:01
2002.12.05
Запрет выключения или рестарта компа.


1-14623
Test
2002-11-25 01:28
2002.12.05
Как сделать чтобы к каждому


1-14604
nika_ufc
2002-11-24 17:34
2002.12.05
все хорошо НО.............


1-14611
litex
2002-11-24 20:56
2002.12.05
Как изменить шрифт установленный по умолчанию ...




   Наверх