Ver Mensaje Individual
  #17  
Antiguo 26-01-2015
Avatar de duilioisola
[duilioisola] duilioisola is online now
Miembro Premium
 
Registrado: ago 2007
Ubicación: Barcelona, España
Posts: 1.738
Reputación: 20
duilioisola Es un diamante en brutoduilioisola Es un diamante en brutoduilioisola Es un diamante en bruto
"Nuve" ??? Qué dolor de ojos!!!!
Supongo que habrás querido decir nuBe

Pero bueno... al caso...
Después de 16 mensajes, parece que te has explicado:

Pasar datos de una base Firebird a una base MySQL.

Por un lado tienes que poder conectar a ambas bases de datos. A la base de datos Firebird, no tendrás problemas, porque ya lo haces.
En cuanto a la base de datos MySQL es un poco mas complicado.
Primero tendrás que abrir el puerto 3306 en el servidor MySQL.
Luego tendrás que decirle a MySQL que permita conexiones de fuera, creando un usuario y diciéndole que puede conectarse desde una IP externa.
Una vez tengas esto del lado del servidor, puedes conectar mediante las zeoslib o crear una conexión ODBC hacia esa base.
Finalmente te queda hacer el bucle que lea de una base y escriba en la otra...

Código Delphi [-]
// Abrir datos
QOrigen.Open;
// Abrir destino
QDestino.Open;

// Mientras haya datos, los inserto en destino
while (not QOrigen.EOF) do
begin
   QDestino.Insert;
   QDestino.Field.... := QOrigen.Field... ;
   QDestino.Post;
   QOrigen.Next;
end;

// Cierro Datos
QOrigen.Close;
// Abrir destino
QDestino.Close;
Responder Con Cita