Usuário com melhor resposta
Como posso fazer backup de Banco de Dados (Access)?

Pergunta
-
Olá pessoal,
Criei um programa em VB 2010 Express.
Estou usando banco de dados em Access.
Gostaria de saber como posso criar um comando para backup.
Por ex. Criaria um botão e o usuário apertaria para fazer backup de Banco de dados no Pendrive por ex.
Dessa menira se um dia tiver algum problema no meu computador, poderei recuperar todos os dados anteriores, certo?
Obrigado.
Ah...alguém poderia me explicar a diferença entre o uso de Banco de Dados em Access e Banco de dados SQL (criado dentro do VB2010)?
Só sei usar com Access, mas não sei se é a melhor opção.
Respostas
-
Olá Novato2010,
Então, eu criei um código para fazer o backup do banco de dados numa pasta escolhida pelo Usuario:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim fileOrigem As String = Application.StartupPath & "\meu_banco_de_dados.mdb" Dim filedestino As String, o As New FolderBrowserDialog If o.ShowDialog <> Windows.Forms.DialogResult.OK Then Exit Sub filedestino = o.SelectedPath & "\backup.mdb" IO.File.Copy(fileOrigem, filedestino) End Sub
Quanto ao banco de dados eu nunca trabalhei com Access e Sql, acho que por falta de necessidade. Andei usando ultimamente XML para guardar os favoritos de um navegador de internet que criei, e usei um objeto DataSet para Processar o arquivo. Para mim o XML é uma boa opção.
Fica aí a dica.;)
- Sugerido como Resposta jacobsamuel quarta-feira, 18 de agosto de 2010 09:01
- Marcado como Resposta AndreAlvesLimaModerator quinta-feira, 26 de agosto de 2010 23:07
Todas as Respostas
-
Olá Novato2010,
Então, eu criei um código para fazer o backup do banco de dados numa pasta escolhida pelo Usuario:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim fileOrigem As String = Application.StartupPath & "\meu_banco_de_dados.mdb" Dim filedestino As String, o As New FolderBrowserDialog If o.ShowDialog <> Windows.Forms.DialogResult.OK Then Exit Sub filedestino = o.SelectedPath & "\backup.mdb" IO.File.Copy(fileOrigem, filedestino) End Sub
Quanto ao banco de dados eu nunca trabalhei com Access e Sql, acho que por falta de necessidade. Andei usando ultimamente XML para guardar os favoritos de um navegador de internet que criei, e usei um objeto DataSet para Processar o arquivo. Para mim o XML é uma boa opção.
Fica aí a dica.;)
- Sugerido como Resposta jacobsamuel quarta-feira, 18 de agosto de 2010 09:01
- Marcado como Resposta AndreAlvesLimaModerator quinta-feira, 26 de agosto de 2010 23:07
-
Olá,
Para quem está estudando recomendo usar o banco Sql Local (que tem dentro do VS), ele tem uma estrutura mais parecida como o Sql Server, é melhor para aprender sobre banco do que o Access...
Abraço,
Ricardo Alves
www.ricardoalves.me
Se for útil, por favor marque ;) -
caro novato,
não sou programador profissional, porém acredito que qualquer opção que fizer será boa, pois você se especializará nela. Eu por exemplo trabalho com o Acess por acha-lo de melhor maleabilidade e pelo fato de o acess ser compativel com a maioria de programas que utilizam bancos de dados e pela sua possibilidade de criacao de relatorios, que para nós iniciantes não é uma tarefa tão acessível. Eu mesmo postei diversas duvidas sobre relatorios e não houve um filho de Deus que atendesse o perguntado.
Quanto ao backup o Hebert matou a charada, nao acredito que haja solucao melhor para o que vc postou.
no meu blog há rotinas de manuseio do acess.
www.jacobsamuel.no.comunidades.net
dá uma passada por lá e quanto tiver alguma duvida pode postar.
abraço
-
Olá Herbert, tudo bem?
Obrigado pela dica.
Mas, não sei se estou fazendo certo...ocorre erro.
O que será que estou fazendo de errado?Private Sub BACKUPToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BACKUPToolStripMenuItem.Click
Dim fileOrigem As String = Application.StartupPath & "C:\Users\chk\Desktop\Teste_BDRelacionado\Proj07_Access2000_teste1.mdb"
Dim filedestino As String, o As New FolderBrowserDialog
If o.ShowDialog <> Windows.Forms.DialogResult.OK Then Exit Sub
filedestino = o.SelectedPath & "\backup.mdb"
IO.File.Copy(fileOrigem, filedestino)
End Sub
-------------------------------------------------------------------------------------------------
Aproveitando, mais uma dúvida:
Como posso também, recuperar o banco de dados?
Por ex. Se um dia eu tiver problema no micro, reinstalaria meu programa e recuperaria os dados do Backup. -
-