Backup urgente!!!!

Delphi

29/11/2009

  Bom dia a todos!!!
Tenho um sistema feito em delphi 7 com BD firebird, utilizo os componetes da paleta dbexpress / simpledataset.
Gostaria de saber com faço para fazer backup dos dados toda vez que fecho o sistema.

Desde já agradeço!
Connection

Connection

Curtidas 0

Respostas

Paulo Freire

Paulo Freire

29/11/2009

Utilize o utilitario do proprio Firebird Gbak

faça um arquivo Bat ou use o ShellApi dentro do Delphi


Exemplo:
# Variavel com usuario e senha do firebird
set isc_user=SYSDBA
set isc_password=masterkey

# Acesso a pasta onde se encontra o .gdb ou .fdb
# Coloque o caminho da pasta do seu banco de dados cd /home/smb/banco

echo  "Sera iniciado o backup do BANCO DE DADOS!"

# Comando que faz a criacao do backup do GDB
# E cria um arquivo .gbk com o dia da semana+hora
# Mude o item BANCO_DE_DADOS.gdb pelo nome do seu arquivo.
gbak -backup -ignore BANCO_DE_DADOS.fdb bkp_$(date +%A_%H%M).fbk


Ou faça Direto por Shell dentro do Delphi


uses ShellApi;
...
ShellExecute(Handle, 'open', 'c:\Suaaplicacao\gbak -b -user usuario -password senha arquivo_banco arquivo_backup', nil, nil, SW_SHOWNORMAL) ;


Coloque o Binario gbak dentro da pasta da sua aplicação ou use de sua origem mesmo.
GOSTEI 0
POSTAR