Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.12.05;
Скачать: 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 вся ветка

Текущий архив: 2002.12.05;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.021 c
1-14516
UserL
2002-11-26 14:07
2002.12.05
Как сделать чтоб...


3-14417
Yakudza
2002-11-16 20:02
2002.12.05
RecordCount


3-14447
Sergioly
2002-11-15 10:28
2002.12.05
БД в локалке!


7-14844
VIB
2002-10-01 13:32
2002.12.05
GetLastError() и FormatMessage()


1-14488
skiph
2002-11-26 06:44
2002.12.05
SetLength