Backup Service Issue
Posted: Thu 19 Jan 2012 05:38
I have trouble with the IBCBackupService Component. I have tried searching this forum and google for a solution. The PDF documentation doesn't help.
Platform Win 7 4 bit, Delphi XE (32 bit)
I have the code
I get no error, no exception and no baclup output.
I was not sure if the IBCConnection could/should be connected or disconnected when activating the backuo, I have tried it both ways (con/discon) but had the same result.
There is no error and the try blocks catch nothing.
Where am I going wrong?
(An example in the demos in a future release would be nice)
regards and thanks
SeaCay
Platform Win 7 4 bit, Delphi XE (32 bit)
I have the code
Code: Select all
var
ConnectionStatus : boolean;
begin
with vmlDM.IBCBackupService1 do begin
ClientLibrary := VMLDM.vmlDB.ClientLibrary;
Protocol := TCP;
LoginPrompt := False; Username := 'SYSDBA';
Password := '********';
Server := VMLDM.vmlDB.Server;
Database := VMLDM.vmlDB.Database;
BackupFile.Clear;
BackupFile.Text := format('C:\DBSource\Backups\GuLogs_%s.gbk', [formatDateTime('dd_mmm_yyyy_hh_nn', now)]);
Attach;//connect to DB
try
try
connectionStatus := vmlDM.vmlDB.Connected;
if (connectionStatus) then
active := true;
vmlDM.vmlDB.Disconnect;
ServiceStart;
except on E: Exception do
MessageDlg(format('Backup of GuLogs Database Failed%sReason : %s', [CR, e.Message]), mtInformation, [mbOK], 0);
end;
finally
VMLDM.IBCBackupService1.Detach;
active := false;
if (connectionStatus) then
vmlDM.vmlDB.Connected;
end;
end;
I was not sure if the IBCConnection could/should be connected or disconnected when activating the backuo, I have tried it both ways (con/discon) but had the same result.
There is no error and the try blocks catch nothing.
Where am I going wrong?
(An example in the demos in a future release would be nice)
regards and thanks
SeaCay