[Resolvido]backup em pen drive

Boa tarde
gostaria de uma ajuda. o 
tenho um sistema simples e não uso em rede, porem as vezes tiro uma copia em um pen driver e levo pra casa. e ao outro dia tenho que apagar o do pc e copiar o do pen driver que foi modificado. 
gostaria de saber se tem a possibilidade de fazer um botão que ao clicar ele atualizasse os dados do sistema que esta no meu pen driver para o pc, ou ao contraio o sistema atualiza-se os dados que estão em meu pc para o pen driver. 
agradeço desde já. uma boa tarde a todos!

Fernando,

Veja se consegue trabalhar este código, pois com certeza ele serve pra você:

Crie um módulo com este código:

Código:


Public Function BackBD()

'elaborado por: JPaulo - 11/10/2006 'objectivo: criar (1) uma copia de segurança por mês ' pode ser alterado para (1) uma por dia, ou uma (1) por ano, para 'isso basta alterarem o Format(Now(), "_mmyyyy") para Format(Now(), "_ddmmyyyy")

'O caminho tem de ter o nome da pasta, neste caso Backup e o nome que querem dar ' à MDB da cópia.

Dim CopiaSegura As Object

Dim Caminho As String

Caminho = "c:\caminho onde será feito o backup"

'Nome da pasta e nome de inicio para o banco de backup

Set CopiaSegura = CreateObject("Scripting.FileSystemObject")

CopiaSegura.CopyFile CurrentProject.Path & "\nomedobancodedados", Caminho & Format(Now, "_ddmmyyyy") & ".accde"

End Function


Depois chame a função BackBD() onde quiser que ele irá fazer uma cópia do seu Banco de dados.

Fernando boa tarde!

Tenho um cliente que trabalha com emissão de recibos de doações, as vezes não dá tempo e ele leva trabalho para casa. A solução mais fácil que dei a ele foi colocar a base de dados em uma pasta do google driver onde ele não pode fazer a digitação simultânea mas pode fazer em locais diferentes bastando observar a sincronização da base do escritório com a da casa. Tem funcionado bem até hoje...

Boa noite
deu certo
Obrigado!!!