Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Trucos (https://www.clubdelphi.com/foros/forumdisplay.php?f=52)
-   -   Realizar Inserciones másivas (https://www.clubdelphi.com/foros/showthread.php?t=80603)

Neftali [Germán.Estévez] 02-07-2006 01:35:51

Realizar Inserciones másivas
 
Los que trabajamos en el mundo complejo de las bases de datos, en algún momento nos hemos enfrentado al problema de migrar una gran cantidad de información hacia nuestra base de datos (normalmente en un formato diferente).

He aquí un ejemplo de como hacerlo.
Deberá de colocar dos componentes database, uno de ellos deberá de estar configurado para acceder a las tablas destino (propiedad DataBaseName = dbDestino). El otro deberá de estar configurado para acceder a las tablas de origen (propiedad DataBaseName = dbOrigen).

Después coloca un componente TQuery, y deja vacia la propiedad "DatabaseName"; En la propiedad SQL coloca un código parecido al siguiente:

Código SQL [-]
Insert into ":dbDestino:TablaDestino" (CampoDestino1,CampoDestino2)
Select CampoOrigen1,CampoOrigen2
From ":dbOrigen:TablaOrigen"

Después solo ejecuta la instrucción

Código Delphi [-]
  Query1.ExecSql

Y listo.

Hagan una prueba y se sorprenderan de los resultados.

morfeo21 08-08-2006 17:29:36

Gracias por la respuesta Neftali , voy a realizar unas pruebas y te comentarre lo que me resulte.

morfeo21 09-08-2006 01:09:20

Como lo haria si utilizo componentes ADO...???


La franja horaria es GMT +2. Ahora son las 23:56:03.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi