[firebase-br] Erro ao fazer backup com IBBackupService

Thiago zan_ti em farmaponte.com.br
Qua Abr 20 16:48:30 -03 2011


Pessoal, boa tarde.

Ambiente: Delphi 7 + Firebird 1.5

Tenho a seguinte rotina de backup:

Memo.Lines.Add('Setando os dados do backup');
IBBackupService.Active := False;
IBBackupService.DatabaseName := 'Banco.FDB';

Memo.Lines.Add('Adicionando os arquivos de backup');
IBBackupService.Attach;
IBBackupService.BackupFile.Clear;
IBBackupService.BackupFile.Add(vDiretorioBackup + vNome);

Memo.Lines.Add('Ativando o processo de backup');
IBBackupService.Active := True;
Memo.Lines.Add('Iniciando o processo de backup');
IBBackupService.ServiceStart;
while not IBBackupService.Eof do
    Memo.Lines.Add(IBBackupService.GetNextLine);

Ocorre que em apenas um computador na etapa 
(IBBackupService.ServiceStart) aparece a seguinte mensagem: Error 
reading data from the connection

Nos outros 4 computadores que tem o programa instalado o backup funciona 
normalmente, inclusive no meu com o mesmo FDB da máquina que está dando 
erro.

Alguém sabe o que pode ser?

Obrigado!






Mais detalhes sobre a lista de discussão lista