Copiar datos entre Bases de Datos

[Casimiro Notevi]

No sé si sqlite lo permite, algunas bases de datos sí, el trabajar con ambas a la vez, algo así como:

Código SQL [-]
insert into base2.tablaA (select * from base1.tablaA)

La forma clásica es lo que ha explicado Caral, tener 2 conexiones: (resumiendo mucho):

Código Delphi [-]
base1.open;
while not base1.eof do
begin
  insert into base2 values (base1.campo1, base1.campo2, base1.campo3);
  base2.post;
  base1.next;
end;

[roman]

Empezado por Casimiro Notevi

No sé si sqlite lo permite, algunas bases de datos sí, el trabajar con ambas a la vez, algo así como:

Código SQL [-]
insert into base2.tablaA (select * from base1.tablaA)

Sí lo permite, pero primero hay que "importar" la segunda base:

Código SQL [-]
attach database "\ruta\a\la\base2.db" as base2

// Saludos

[martini002]

Hoy me fui LEJOS donde no existiera la energia electrica, (Amazonia Venezolana)
y apuesto que muchos de nosotros quisiera irse, pero tan solo por un momento
porque seria una pena evitar recibir un halago como este que recibi cuando llegue:
"Martin, le vas a quitar el trabajo a los Administradores", aunque se que no sera verdad,
y menos yo; No porque menos-precie mi ezfuerzo o el de ustedes amigos mios,
sino que por tan solo; por AHORA no pasara, y solo nosotros sabemos porque,
y por tanto no respondi a este mensaje aunque hallan llegado muchas notificaciones,

me gustaria opinar sin aun probarlo, (aunque lo probare a primera hora)
Roman! Tienes toda la razon, me faltaba conocer esa sentencia,
donde importaras a memoria (Supongo yo!) toda la tabla,
y luego la manejaras a tu antojo, pues es lo que mas logica y sentido comun
puede tener, aunque no menos que las otras opiniones, pero si creo yo,
que absurdo seria no tener este problema en cuenta,
Importar una BD a Otra? despues de tantos años de investigacion sobre el asunto?
no creo que vallamos nosotros a inventar como hacerla, no se si me siguen,
pero bueno, no queria dejar este momento para escribirles.

A primera hora estare haciendo las pruebas correspondientes!
como buen curioso e informatico caprichoso

Gracias Roman y a todos

[ElMug]

En SQLite3 es facil.

Attach, como explico Roman, y usa el DUMP de la BD-1 a un archivo DumpX. Luego todo el archivo DumpX (que son comandos SQL en texto comun) lo aplicas a la BD-2. Esto te crea la tabla y seguidamente le carga los datos.

En estos Dumps puedes inclusive pasar TODA una base de datos a otra.

Sin embargo, con SQLite3, puede siempre usarse una base de datos que este "attached" como si ya fuera solo una. Ese principio aumenta la capacidad de multiaccesos para escribir: procesos escribiendo en BD-1 no bloquean BD-2, pues son archivos fisicamente independientes.

[martini002]

Saludos,

Estuve haciendo unas pruebas, pero no se me ocurre mas nada,
y aun no he podido encontrar algun ejemplo de alguien que lo halla hecho antes
miren lo que he estado haciendo, al parecer importa la BD correctamente,
porque no me da ningun error, y de paso estoy viendo cual es la base de datos conectada
actualmente, lo que me muestra que SI esta conectada la numero 1 (Hola)
pero cuando entra al proceso de copiar los datos entonces da un error,
ya las dos estan creadas, lo hice con una misma conexion,
aun no he intentado con dos, pero creo que no hace falta,
por lo menos no hasta este paso, pues las crea correctamente
que creen que pueda estar fallando aqui?

Gracias

Código Delphi [-]
procedure TForm7.Button4Click(Sender: TObject);
var
a:string;
begin
  ZQuery1.Close;
  ZQuery1.SQL.Text:='Attach Database "F:\Mundo.sqlite" as Mundo';
  ZQuery1.Open;
  ZQuery1.Close;
  A:=ZConnection1.Database;
  ShowMessage(a);//Esto muestra: F:\Hola.sqlite
  ZQuery1.SQL.Text:='Insert Into Mundo.Prueba (Select * From Hola.Prueba)';//Aqui da el error de Missing Database o una sentencia incorrecta.
  ZQuery1.Open;
end;

[Casimiro Notevi]

Empezado por martini002

pero cuando entra al proceso de copiar los datos entonces da un error,

Hombre, si quieres que alguien que sepa del tema te ayuda... no hagas que tenga que adivinar el error

[roman]

Y, ¿ZQuery está conectado a ZConnection?

// Saludos

[martini002]

Casimiro eso lo se, el error esta expresado en el codigo

Código Delphi [-]
ZQuery1.SQL.Text:='Insert Into Mundo.Prueba (Select * From Hola.Prueba)';//Aqui da el error de Missing Database o una sentencia incorrecta.

Si Roman, esta conectado el ZQuery1 al ZConnection1
Gracias

[roman]

Empezado por martini002

Código Delphi [-]
procedure TForm7.Button4Click(Sender: TObject);
var
a:string;
begin
  ZQuery1.Close;
  ZQuery1.SQL.Text:='Attach Database "F:\Mundo.sqlite" as Mundo';
  ZQuery1.Open;
  ZQuery1.Close;
  A:=ZConnection1.Database;
  ShowMessage(a);//Esto muestra: F:\Hola.sqlite
  ZQuery1.SQL.Text:='Insert Into Mundo.Prueba (Select * From Hola.Prueba)';//Aqui da el error de Missing Database o una sentencia incorrecta.
  ZQuery1.Open;
end;

Yo puedo hacer esto sin problemas:

Código Delphi [-]
ZQuery1.SQL.Text := 'attach database "\ruta\a\la\base2.db" as base2';
ZQuery1.ExecSQL;

ZQuery1.SQL.Text := 'insert into base2.tablaA (select * from base1.tablaA)';
ZQuery1.ExecSQL;

Pero claro, si pongo Open en lugar de ExecSQL, obtengo errores

// Saludos

[ElMug]

Si. Gracias Roman.

A esto me referia, mas sin detalles, por no ser usuario de los Zeos.