Ver Mensaje Individual
  #1  
Antiguo 02-07-2006
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.233
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
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.
Responder Con Cita