como fazer backup/restore no delphi usando winexec...
Eu uso delphi7 e firebird 2.5
coloquei um botão onde pretendo fazer um backup, primeiramente e depois se conseguir esse feito pensarei no restore.
Tentei assim (alias tentei com uma query, mas não dei conta, ai descobri winExec).
procedure TFrmCadIEQ.Local1Click(Sender: TObject);
begin
WinExec(PCHAR(''C:\PROGRAM FILES\FIREBIRD\FIREBIRD_2_5\BIN\GBAK.EXE -G -B -V -Z C:\PROJETOS\IGREJA_DELPHI\DADOS\DB_IEQ.FDB C:\PROJETOS\IGREJA_DELPHI\DADOS\DB_IEQ.FDK -user SYSDBA -pas masrtekey''), SW_SHOWNORMAL);
end;
Depois tentei
procedure TFrmCadIEQ.Local1Click(Sender: TObject);
begin
WinExec(''CMD C:\PROGRAM FILES\FIREBIRD\FIREBIRD_2_5\BIN\GBAK.EXE -G -B -V -Z C:\PROJETOS\IGREJA_DELPHI\DADOS\DB_IEQ.FDB C:\PROJETOS\IGREJA_DELPHI\DADOS\DB_IEQ.FDK -user SYSDBA -pas masrtekey''), SW_SHOWNORMAL);
end;
Mas também não deu certo ele apenas abre o CMD.
Alguma dica? obs: sou iniciante em delphi. Não tenho curso, entretanto já fiz 12 programas completos (simples mas que funcionam).
Agora estou entrando em áreas mais complicadas.
coloquei um botão onde pretendo fazer um backup, primeiramente e depois se conseguir esse feito pensarei no restore.
Tentei assim (alias tentei com uma query, mas não dei conta, ai descobri winExec).
procedure TFrmCadIEQ.Local1Click(Sender: TObject);
begin
WinExec(PCHAR(''C:\PROGRAM FILES\FIREBIRD\FIREBIRD_2_5\BIN\GBAK.EXE -G -B -V -Z C:\PROJETOS\IGREJA_DELPHI\DADOS\DB_IEQ.FDB C:\PROJETOS\IGREJA_DELPHI\DADOS\DB_IEQ.FDK -user SYSDBA -pas masrtekey''), SW_SHOWNORMAL);
end;
Depois tentei
procedure TFrmCadIEQ.Local1Click(Sender: TObject);
begin
WinExec(''CMD C:\PROGRAM FILES\FIREBIRD\FIREBIRD_2_5\BIN\GBAK.EXE -G -B -V -Z C:\PROJETOS\IGREJA_DELPHI\DADOS\DB_IEQ.FDB C:\PROJETOS\IGREJA_DELPHI\DADOS\DB_IEQ.FDK -user SYSDBA -pas masrtekey''), SW_SHOWNORMAL);
end;
Mas também não deu certo ele apenas abre o CMD.
Alguma dica? obs: sou iniciante em delphi. Não tenho curso, entretanto já fiz 12 programas completos (simples mas que funcionam).
Agora estou entrando em áreas mais complicadas.
Fabiano Pereira
Curtidas 0