Ver Mensaje Individual
  #25  
Antiguo 11-09-2012
Avatar de martini002
martini002 martini002 is offline
Miembro
 
Registrado: may 2012
Ubicación: Puerto Ordaz - Venezuela
Posts: 175
Reputación: 12
martini002 Va por buen camino
Excelente Roman,

si tengo acceso a esa ayuda pero te confieso,
leer eso es como leer chino con aleman,
entiendo ingles pero eso es un lenguaje muy tecnico y me confunde bastante,
tampoco se mucho como buscar alli, nunca me imagine que con Pragma podria hacer eso,

al final quedo asi, para quien pueda servir
copiar de una base de datos a otra usando SQLite y Zeos en Delphi
Código Delphi [-]
procedure TForm7.Button4Click(Sender: TObject);
begin
  ZQuery1.SQL.Text := 'Pragma DataBase_List';//Cargo la lista de bases de datos añadidas
  ZQuery1.Open;
  if not ZQuery1.Locate('Name', 'Mundo', []) then//sino consigue la BD que necesito entonces la agrega
    begin
      ZQuery1.Close;
      ZQuery1.SQL.Text:='Attach Database "F:\Mundo.sqlite" as Mundo';
      ZQuery1.ExecSQL;
    end;
  ZQuery1.SQL.Text:='Insert Into Mundo.Prueba Select * From Prueba';//luego inserto la informacion de una a otra BD y listo el pollo!
  ZQuery1.ExecSQL;
end;

Gracias a todos por sus aportes esto me fue realmente util como todo
Saludos
__________________
El Conocimiento se puede compartir, pero la Experiencia es totalmente Intransferible.
Responder Con Cita