crear backup de tablas

[analoyra]

Hola, necesito si alguien me puede ayudar, tengo una BD Access con varias tablas, y tengo que tener una opcion donde yo selecciono las tablas que quiero crear una copia de seguridad, y viseversa.

si por favor alguien me puede orientar? uso VB6 y sql

gracias!!

[Avellaneda]

Iniciado por analoyra

Hola, necesito si alguien me puede ayudar, tengo una BD Access con varias tablas, y tengo que tener una opcion donde yo selecciono las tablas que quiero crear una copia de seguridad, y viseversa.

si por favor alguien me puede orientar? uso VB6 y sql

gracias!!

Hola,
para copiar una tabla en otra base de datos externa:

cnx.Execute "SELECT * INTO [LaTabla] IN Copia.mdb FROM [LaTabla]"

Donde:
cnx es la conexión a la base de datos origen
LaTabla es el nombre de la tabla que quieres copiar
Copia.mdb es la base de datos destino.

[analoyra]

muchas gracias! lo voy a probar y te cuento

[analoyra]

Hola otra vez,
tengo un problema, yo tengo esta rutina, que la estoy haciendo paso a paso,
FileCopy App.Path & "\EMPRESAS\sucursales.mdb", App.Path & "\" & empresas & "\" & " copiasuc.mdb "
cn.Execute "SELECT * INTO puntovta IN copiasuc.mdb FROM puntovta"
el archivo me lo crea bien, dentro de d:\PracProf\copiasuc.mdb
pero cuando llega a ejecutar el cn me dice que no encuentra la ruta d:\PracProf\copiasuc.mdb, pero esta!!!
Cual puede ser el error? gracias

[Avellaneda]

Hola,
Tienes que indicar la ruta completa de la base de datos:

Dim NuevaBD As String
NuevaBD = App.Path & "\" & empresas & "\" & " copiasuc.mdb "
cn.Execute "SELECT * INTO [LaTabla] IN '" & NuevaBD & "' FROM [LaTabla]"

Aunque lo que estás haciendo es copiar directamente la base de datos y seleccionando las tablas a copiar.
Te va a dar error de que la tabla ya existe. Deberías crear la base de datos vacía y después copiar las tablas seleccionadas o por el contrario si haces una copia de la BD, eliminar las tablas que no te interesen en la nueva BD.

[analoyra]

Ok, muchas gracias, le copie una bd en blanco y anda