Suscríbete a Aprende-Viendo 5.0
Content
realizar backup de BD access 2013 en VB 6.0
Buenas a quien pueda ayudarme en lo siguiente:
estoy tratando de hacer backup de la base de datos de mi sistema hecha en Access 2013, quiero simplemente que al cerrar la sesion o salga del sistema copiarla del directorio donde se encuentra a la carpeta respaldo, he buscado en la web pero no doy pie con bola estuve revisando haber si habia alguna similar aqui y nada que se le parezca agradezco toda ayuda que puedan darme al respecto...
estoy tratando de hacer backup de la base de datos de mi sistema hecha en Access 2013, quiero simplemente que al cerrar la sesion o salga del sistema copiarla del directorio donde se encuentra a la carpeta respaldo, he buscado en la web pero no doy pie con bola estuve revisando haber si habia alguna similar aqui y nada que se le parezca agradezco toda ayuda que puedan darme al respecto...
3 respuestas Agrear Respuesta
-
Que tal amigo, pon este código en algun botón para que lo revises
asumiendo que nuestro archivo de trabajo esta en la raíz y es data.accdb, y queremos respaldar en una carpeta llamada backups también en la raíz.
para el proceso de restauración seria a la inversa y a través de un commondialog buscar el archivo que se desea, re-nombrando de nuevo a data.accdb
Dim fecha As String
fecha = DateTime.Now
'cambiamos los dos puntos por punto y como porque lo acepta
fecha = Replace("backup " & fecha & ".accdb", ":", ";")
FileCopy App.Path & "\data.accdb", App.Path & "\backups\" & fecha
saludos. -
buenas noches hice lo que me recomendaste y me da el error de que no consigue la dirección le cambie al codigo que me diste el nombre de la base de datos por el que uso y cuanto te refieres a "backups" es la carpeta donde se va a guardar o respaldar la BD, alli coloque la carpeta donde quiero la base de datos y nada, cambie la BD de donde la tengo a la raiz del programa haber si era eso y tampoco...
Agradesco tu Paciencia. Muchas Gracias por la espera! Somos Aprende Viendo 5.0
Grupo AprendeViendo & Ronald López agradecen a todos sus fieles seguidores por la larga espera. Basados en nuestro nuevo concepto, Grupo Aprendeviendo les ofrece un sin fin de posibilidades en sus largas horas de adiestramiento y soluciones de problemas tanto empresariales como cotidianos. Sigamos siendo un portal de enseñanza de virtual gratuito y más que eso!
Copyright © 2006 - 2014 - Grupo AprendeViendo & Ronald López. Todos los Derechos Reservados
Grupo AprendeViendo a sido desarrollado por Ronald López - Kalizron. Esta prohibida su reproducción total o parcial sin previa autorización de parte de sus autores. Ronald López Bahamonde - Resolución: 1024-768 - Aviso Legal - Términos de Uso