IBBackupService [D6, IB6.x]
Alexei Sviridov © (2004-03-16 18:48:00)
Вот кусок
ibbs.BackupFile.Add(backupdialog.FileName);
ibbs.LoginPrompt := False;
ibbs.Params:=dm.DB.Params;
ibBS.Verbose := true;
try
ibbs.Active:=true;
re.Lines.Add('Database backup
started on '+FormatDateTime(LongDateFormat, Now)+' at
'+FormatDateTime(ShortTimeFormat, Now));
re.Lines.Add(' ');
Application.ProcessMessages;
// ibbs.Attach;
ibbs.ServiceStart;
{ re.Visible:=true;
while not ibbs.Eof do
begin
logstr:=ibbs.GetNextLine;
re.Lines.Add(logstr);
re.Refresh;
//
Application.ProcessMessages;
end;
}
ibbs.Active:=false;
Это работает и local и с сервера (имеется ввиду файлбазы).
Если отремачить кусок выделенный наклоном, то при запуске с сервера
: "Error reading data from connection"...В чем проблема?
kaif (2004-03-16 22:15:00) [1]
Какой конкретно сервер используется? Кажется, у меня была
ошибка с похожим сообщением на одном из старых Firebird.
Наверх 
ЧАТ |
Орешник |
|
