Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.23;
Скачать: CL | DM;

Вниз

Проблема с выполнением SQL запроса, Oracle 8, Delphi 6, DOCI 1.19   Найти похожие ветки 

 
Plus   (2004-04-29 22:18) [0]

procedure TDataModule2.DataModuleCreate(Sender: TObject);
begin
AOraSQL1.Active:=True;
AOraSQL1.ExecSQL;
AOraSQL1.Active:=False;
OraDB1.CommitTransaction;
Halt;
end;




object OraDB1: TOraDB
   Active = True
   DBLogin = "bergoff"
   DBPassword = "123456"
   DBServer = "server"
   LoginPrompt = False
   OraTransIsolationLevel = tiDefault
   OraSessionIsolationLevel = siDefault
   RollbackOnDisconnect = False
   ConnectAs = caNormal
   SQLTrace = stDefault
   Left = 328
   Top = 128
 end
 object AOraSQL1: TAOraSQL
   Active = False
   Database = OraDB1
   FetchCount = 1000
   SQL.Strings = (
     "delete from cl_ref")
   UniDirectional = False
   Left = 264
   Top = 128
 end



Программа выдаёт:Не Select выражение! Используйте ExecSQL метод вместо Open.


Чо мне сделать?


 
Vlad ©   (2004-04-29 22:44) [1]


>
> Чо мне сделать?

Убрать вот это:
AOraSQL1.Active:=True;
AOraSQL1.Active:=False;

И оставить только это:
AOraSQL1.ExecSQL;


 
Курдль ©   (2004-04-29 23:48) [2]


> Программа выдаёт:Не Select выражение! Используйте ExecSQL
> метод вместо Open.

Вот бы мне программа выдавала такое, а то вечно хрень вывалит типа "DBERR789872309 - UNKNOWN ERROR" :-\ Уж мы бы с ней поговорили...

А вот это зачем:
OraDB1.CommitTransaction;
Halt;
?



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

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

Наверх




Память: 0.47 MB
Время: 0.032 c
3-1083325256
lockheed_man
2004-04-30 15:40
2004.05.23
Не все результаты SQL -запроса выводятся в гриде


9-1073465597
mad0max
2004-01-07 11:53
2004.05.23
GLScene - Дырка :)


1-1083925865
Mazer
2004-05-07 14:31
2004.05.23
FreeReport под Delphi7?


14-1083737715
Шишкин Илья
2004-05-05 10:15
2004.05.23
Проверьте работоспособность кода в Windows98


1-1083749325
plotn_
2004-05-05 13:28
2004.05.23
Как узнать видимость меню.