![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
работа с БД из отдельного потока [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;