Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Доступ к базе данных из процесса Windows 2000 [D5, IB5.x]

Evgeny_Parakhnevich © (2002-02-07 10:51:00)
Как организовать доступ к базе данных из процесса?
Использую компоненты от Interbase, однако при попытке открыть базу вываливает ошибку Unknown database.
Что делаю не так?

Alexandr (2002-02-08 10:55:00) [1]
да пошел ты...

Мы специалисты, но не Нострадамусы.
И чужие мысли читать не умеем.

Evgeny_Parakhnevich (2002-02-08 10:24:00) [2]
Спасибо за помощь :|
Специалисты, блин...

Alexandr (2002-02-08 06:49:00) [3]
>Evgeny_Parakhnevich (07.02.02 12:44)
>Все дефолтные

ну так покрути их сам.
Раз уж тут сказать влом.

Ura (2002-02-07 17:11:00) [4]
Проверь, может коннект уже есть?
Т.е. IBDatabase.Connected:=False;
...
IBDatabase.Connected:=Тrue;

Evgeny_Parakhnevich (2002-02-07 12:44:00) [5]
Все дефолтные

Alexandr (2002-02-07 12:37:00) [6]
свойства сервиса какие?

Evgeny_Parakhnevich (2002-02-07 12:34:00) [7]
:)
В этой: IBDatabase.Connected:=true;

Содержание ошибки:
EIBInterBaseError : unavailable database

Может как-то путь по другому надо указывать? Или есть еще какие-то параметры?

В designe-time все рулит. Когда пишешь как приложение - тоже все нормально.

Alexandr (2002-02-07 12:13:00) [8]
ну и в какой строке ошибка?

Evgeny_Parakhnevich (2002-02-07 11:54:00) [9]
Сорри,

IBDatabase.DatabaseName:="D:\IO.GDB";
IBDatabase.Params.Clear;
IBDatabase.Params.Add("USER_NAME=TEST");
IBDatabase.Params.Add("password=test");
IBDatabase.LoginPrompt:=False;
IBDatabase.Connected:=true;

Из сервиса, а не из процесса: TQRobotService = class(TService)

Alexandr (2002-02-07 11:43:00) [10]
слушай, ты уверен, что понимаешь про что пишешь?

Где в твоем куске кода открытие базы, при котором ошибка выдается?

а что значит "из процесса"? Откуда еще-то?

Evgeny_Parakhnevich (2002-02-07 11:29:00) [11]
Такой кусок кода выдает ошибку:
Выполняется в процессе Win2K по таймеру

try
IBTransaction.StartTransaction;
IBQuery.ExecSQL;
IBTransaction.Commit;
except
on E: Exception do
begin
lFile := TStringList.Create;
try
lFile.Add(E.ClassName + " : " + e.Message);
lFile.SaveToFile("d:\QEerror.log");
finally
lFile.Free;
end;
end;
end;

Alexandr (2002-02-07 11:16:00) [12]
по крайней мере ворос задаешь неправильно

Наверх

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