백업받는 부분을 만드는데요..
procedure TMainFm.BitBtn1Click(Sender: TObject);
var SourceDir,TargetDir,Command : string;
begin
SourceDir := 'C:\pppp\DataBase\Test.FDB'; //리모트도 사용할것임..211.251....:C:\...
TargetDir := 'C:\OnLine\Backup\FDATA.FBK';
Command := 'gbak -v -t -user sysdba -password masterkey ' + SourceDir + ' ' + TarGetDir + '';
WinExec(PChar(Command), SW_HIDE);
if WinExec(PChar(Command), SW_HIDE) < 32 then
ShowMessage('에러 발생...')
else
ShowMessage('성공');
end;
이런데요..에러발생 뜨네여...
TargetDir := 'C:\OnLine\Backup\FDATA.FBK' 여기에 FDATA.FBK 이 파일이 미리 있어야 하나요?
|