Fórum backup com delphi com dbxexpress #475556

07/04/2014

0

galera como faço para criar um rotina de backup da minha base de dados

essa rotina pode ser feita pelo usuario nessa tela
o usuario pode restaourar o backup do dia anterior

se alguem poder me ajudar agradeço

ja procurei na net mais nada encontro parecido
Jose Silva

Jose Silva

Responder

Posts

07/04/2014

Marcos Oliveira

Qual banco de dados você usa?
Responder

Gostei + 0

07/04/2014

Jose Silva

sql serve 5.0
os coponentes são SQLConnection, SQLQuery, DataSetProvide, ClientDataSet, DataSource

OS
Windows 64 bits ultimate

delphi7 enterprize
Responder

Gostei + 0

07/04/2014

Jose Silva

so para constar
é mysql 5.0
Responder

Gostei + 0

08/04/2014

Marcos Oliveira

Não trabalho com MySql, mas consegui achar na internet, em outro forum o código abaixo.

mysqldump --add-drop-table --add-locks -n -h server2 -u root -B nome_do_banco_de_dados > "caminho_onde_o_arquivo_sera_salvo" 


Att,

Marcos
Responder

Gostei + 0

08/04/2014

Marcos Saffran

Responder

Gostei + 0

08/04/2014

Jose Silva

vou dar uma olhada
Responder

Gostei + 0

09/04/2014

Jose Silva

cara valeu mesmo muito obrigado,

mas percebi que ele salva no diretótio do mysql

gostaria de saber se tem como alterar esse caminho
vamos supor que ao clicar no botão backup

ele cria um pasta com nome do dia. hora e mes
e salva dentro o backup

será que é possivel?
Responder

Gostei + 0

09/04/2014

Marcos Saffran

No parâmetro "--result-file=" é definido onde será salvo o backup.

Então você pode colocar o caminho desejado:

--result-file=c:\caminho desejado\nome do arquivo desejado

qualquer dúvida pode perguntar.
Responder

Gostei + 0

10/04/2014

Jose Silva

galera fiz como me disseram
porém não visualizei na pasta os arquivos de backup

procedure Tfrm_backup.btn1Click(Sender: TObject);
begin
auxiliar := 'cmd.exe /c "mysqldump --opt --flush-logs --triggers --port=' + edt_porta_servidor.text;
auxiliar := auxiliar + ' --user=' + edt_usuario_servidor.Text + ' --password=' + edt_senha_servidor.Text;
auxiliar := auxiliar + ' --result-file=D:\backup--databases ' + edt_banco_de_dados.Text ;


if not backup(auxiliar) then
ShowMessage('BACKUP NÃO FOI PROCESSADO!')
else
ShowMessage('Backup Realizado!');
end;
Responder

Gostei + 0

10/04/2014

Marcos Saffran

Bom dia Vencelog,

coloque um memo no seu programa e depois de preencher a variável auxiliar coloque:

memo.lines.add(auxiliar);

então copie o comando e execute-o dentro do prompt de comando para ver se há alguma mensagem de erro e nos informe.
Responder

Gostei + 0

10/04/2014

Jose Silva

fiz
[img]http://arquivo.devmedia.com.br/forum/imagem/361863-20140410-135428.jpg[/img]
Responder

Gostei + 0

10/04/2014

Marcos Saffran

Olá Vencelog,

você está com os mesmos problemas que ocorreram no link acima, por favor vá nele e verifique a solução para esse erro.

Se ainda houver dúvidas, por favor nos avise.
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar