Hola.
Quiero saber, como puedo madar datos de IBexpert a SQL(base de dato 'Nuve').
Se esta utilizando:
-Firebird 2.5
-Delphi xe2
aqui le muestro un codigo, el cual solo envia de SQL a SQL o IB a IB. Por su forma de como esta diseñado, claro. pero e estado buscando hacer algo parecido. pero no encuentro un resultado, que me haga de SQL a IB o viceversa.
Codigo:
Código Delphi
[-]if application.MessageBox('DESEA GUARDAR?','guardar un Registro',
MB_ICONQUESTION OR MB_YESNO) = ID_YES then
begin
Dmodulo.ASISTENCIA_COBRAR.Close;
Dmodulo.ASISTENCIA_COBRAR.SQL.Text:='insert into ASISTENCIA_COBRAR select * from ASISTENCIA_Madre';
Dmodulo.ASISTENCIA_COBRAR.ExecSQL;
Dmodulo.ibt.Commit; Dmodulo.ASISTENCIA_COBRAR.SQL.Clear ;
Dmodulo.ASISTENCIA_COBRAR.SQL.Add('select * from ASISTENCIA_COBRAR ');
Dmodulo.ASISTENCIA_COBRAR.Open;
Dmodulo.ASISTENCIA_Madre1.selectSQL.clear;
Dmodulo.ASISTENCIA_Madre1.selectSQL.Text:=('delete from ASISTENCIA_Madre');
Dmodulo.ASISTENCIA_Madre1.ExecSQL;
Dmodulo.ASISTENCIA_Madre1.selectSQL.clear;
Dmodulo.ASISTENCIA_Madre1.selectSQL.Text:=('select * from ASISTENCIA_Madre');
Dmodulo.ASISTENCIA_Madre1.Open;
Dmodulo.ibt.Commit;
SHOWMESSAGE('A sido Insertado');
end;
Espero su respuesta, pr fvr y grcs...