IBBackUpService

← →
абв (2007-10-05 10:52) [0]

Добрый день.

В приложении с помощью IBBackUpService есть возможно создавать backup базы. Но он выполняется только, если к базе подключилиться под "sysdba".

Подскажите, пожалуйста, какие нужно назначить права другим пользователям, чтобы они могли выполнять backup?

← →
Sergey13 © (2007-10-05 10:57) [1]

> [0] абв (05.10.07 10:52)

Зачем другим пользователям делать бекап? Это функция амина.

← →
абв (2007-10-05 11:00) [2]

> Sergey13 © (05.10.07 10:57) [1]

Админ в отпуск пойдет, и что тогда?

← →
Sergey13 © (2007-10-05 11:03) [3]

> [2] абв (05.10.07 11:00)

Пусть запускает бекап ночью по расписанию. Или передает свои полномочия другому. Но это как бы не предмет для данной конференции.

← →
абв (2007-10-05 11:12) [4]

> ...Но это как бы не предмет для данной конференции...

... так есть такая возможность или нет?

← →
Sergey13 © (2007-10-05 11:34) [5]

Похоже только owner может.

← →
абв (2007-10-05 11:39) [6]

> Sergey13 ©
> Это функция амина

Убедили :)

Спасибо.

← →
абв (2007-10-05 12:44) [7]

Появился еще один вопрос по IBBackUpService:

Когда BackUp создается на том же компьютере, где и база, то все нормально.

Если BackUp выполняется с клиентского компьютера, то появляется ошибка:"Error reading data from the connection", хоть backup на сервере и создается. Вчем может быть ошибка?

код:

Var PathBackUp: String; Begin PathBackUp:=ESozdanieArhiva.Text; if PathBackUp[Length(PathBackUp)] <> "\" then PathBackUp := PathBackUp + "\"; PathBackUp:=PathBackUp + FormatDateTime("yyyyddmm_hhnnss",Now)+".gbk"; try //ловим ошибки with TIBBackupService.Create(Self) do try Params.Text:=Format("%s%s%s",["user_name=sysdba", #13#10, frmStart.ReadINI("pas")); if frmStart.ReadINI("TipServer")= "1" then DatabaseName:=frmStart.ReadINI("Server") + ":" + frmStart.ReadINI("PathBase") else DatabaseName:=frmStart.ReadINI("PathBase"); BackupFile.Text:=PathBackUp; if StrToInt(ReadINI("TipServer")) = 0 then Protocol:=Local else begin ServerName:=ReadINI("Server"); Protocol:=TCP; end; LoginPrompt:=False; Active:=True; Memo.Lines.Clear; Memo.Lines.Add(" Дата: "+ DateToStr(Date)+" Время: " + TimeToStr(Time)); Memo.Lines.Add(" Файл базы данных: "+ ExtractFileName(Form1.IBDatabase.DatabaseName)); Memo.Lines.Add(" Файл архива: " + ExtractFileName(PathBackUp)); Memo.Lines.Add(" Начат процесс архивирования"); ServiceStart; while not Eof do Memo.Lines.Add(" Архивирование завершено " + GetNextLine); Active:=False; finally Free; end; Result:=True; except // выдаем сообщение об исключительной ситуации on E: Exception do begin Memo.Lines.Add(e.message); Result:=False; end; end; End;

← →
Sergey13 © (2007-10-05 13:03) [8]

> [7] абв (05.10.07 12:44)
> Если BackUp выполняется с клиентского компьютера, то появляется ошибка
Насколько я помню - так и должно быть.

Дать пользователям права делать беапы со своих компов, это в принципе неправильно с точки зрения безопасности.
Ты не в ту сторону роешь.
Настой бекап НА СЕРВЕРЕ (к которому нет доступа посторонним) по расписанию и забудь об этом. Впрочем иногда надо вспоминать и восстанавливать бекап (в новую БД) для удостоверения в его работоспособности.

← →
абв (2007-10-05 14:18) [9]

> Настой бекап НА СЕРВЕРЕ (к которому нет доступа посторонним)
> по расписанию и забудь об этом.

Программой то пользоваться буду не я. А полагаться на администраторов не хочется (не везде они квалифицированные).

← →
абв (2007-10-05 14:18) [10]

> [9] абв (05.10.07 14:18)
> А полагаться на администраторов не хочется (не везде они
> квалифицированные).

Зато шедулер работает надежно. И не надо всех считать дураками: дать описание установки системы - не выполнят - сами виноваты будут.

← →
абв (2007-10-05 15:12) [12]

> дать описание установки системы

наверно так и сделаю

Спасибо за советы.

IBBackUpService Найти похожие ветки