Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

работа с БД из отдельного потока [D6, IB6.x]


Kaginava ©   (2004-07-10 10:50:00) 

Всем привет, у меня такая проблема

в конструкторе потока :

ibdRecUel := TIBDatabase.Create(nil);
    ibdRecUel.DatabaseName :='server:c:/basa.gdb';
    ibdRecUel.LoginPrompt := false;
    ibdRecUel.Params.Add('user_name=sysdba');
    ibdRecUel.Params.Add('password=1234556');
    ibdRecUel.Params.Add('lc_ctype=WIN1251');

    ibtRecUel:=TIBTransaction.Create(nil);
    ibtRecUel.DefaultDatabase:=ibdUel;
    ibtRecUel.DefaultAction := TACommit;
    ibtRecUel.Params.Add('read_committed');
    ibtRecUel.Params.Add('rec_version');
    ibtRecUel.Params.Add('nowait');

    ibqMaxDt:=TIBQuery.Create(ibdRecUel);
    ibqMaxDt.Database:=ibdRecUel;
    ibqMaxDt.Transaction:=ibtRecUel;
    ibqMaxDt.SQL.Add('Select Max(dt) from UelAvgDt ');


запуске в методе Execute:

   ibdRecUel.Connected:=False;
   ibdRecUel.Connected:=True;
   ibqMaxDt.Active:=true;


при попытке выполнить запрос вылетает ошибка что БД не открыта,
хотя в ходе отладки видно что соединение с БД присходит, а при попытке выполнить запрос вылетает ошибка, может кто сталкивался поскажите пожалуйста.


Kaginava   (2004-07-10 11:03:00) [1]

блин, говорила мне мама будь внимательнее :))
спасибо!


Rem   (2004-07-10 10:59:00) [2]

ibtRecUel.DefaultDatabase:= ibdUel;


Наверх

Титульная страница Поиск, карта сайта Написать письмо