Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Consulta sobre Querys y Delphi (https://www.clubdelphi.com/foros/showthread.php?t=44197)

NeWsP 30-05-2007 21:51:08

Consulta sobre Querys y Delphi
 
Buenas tardes,

estoy "intentando" ( notese las comillas :( ) hacer un programita que coja los datos de una BD de una tabla X , e inserte la informacion en otra tabla Y de otra BD, el problema que tengo, donde me he quedado estancado, es que hago el query al campo que me interesa, meto la informacion en un DBMEMO , y luego saco esa informacion y la meto en una variable.

El problema es que haciendo la consulta asi, solo se coger el primer campo, y no se me ocurre como hacer un bucle para que vaya pasando por todos los campos, coja ese dato, lo meta en la otra BD y coja el siguiente dato, asi todo el rato.

Espero que me podais dar alguna sugerencia, se que es una pregunta bastante general, no estoy pidiendo codigo, ni que me lo den todo hecho, solo necesito un empujon para salir del estancamiento U_U, de que forma creeis que seria mejor hacer eso?

Tambien habia pensando teniendo el SQL de toda la base de datos, e ir leyendo el archivo linea a linea, pero no me acaba de convencer.


Bueno, un saludo,

Y muchas gracias por leer todo mi problema

roman 30-05-2007 22:05:31

Así recorres los registros:

Código Delphi [-]
Table1.Open;
while not Table1.EoF do
begin
  {
    Aquí haces la transferencia de datos
  }
  Table1.Next;
end;

Pero, por otra parte, es posible que puedas hacer toda la transferencia con una sóla consulta SQL:

Código SQL [-]
insert into TablaDestino
(campo)
select campo from TablaOrigen

Dependiendo de qué base de datos uses, podrás hacer o no consultas cruzadas entre distintas bases. Por ejemplo, Paradox y MySQL lo permiten. Firebird no.

// Saludos

NeWsP 30-05-2007 22:09:14

muchisimas gracias roman

Uso mysql , pero son dos BD distintas, y distintas tablas, pero probare eso que comentas, la verdad que si se puede hacer directamente con una consulta seria una maravilla, muchisimas gracias ^^

Ahora a buscar info de como indicar cual es la BD 1 , la BD 2 , y las tablas correspondientes :)

Gracias :D :D

roman 30-05-2007 22:16:30

Cita:

Empezado por NeWsP
Ahora a buscar info de como indicar cual es la BD 1 , la BD 2 , y las tablas correspondientes :)

Te ahorro el trámite :)

Código SQL [-]
insert into BaseDestino.TablaDestino
(campo)
select campo from BaseOrigen.TablaOrigen

// Saludos

NeWsP 30-05-2007 22:56:26

uff perfecto, la verdad es que asi es mucho mas rapido y eficaz :D

muchas gracias otra vez, ahora estoy con las ultimas pruebas ya, algo que me esta tocando un poco las narices

esto funciona

Código:

insert into bd1.table1
(title,introtext,created)
select title,hometext,time from bd2.table2

esto no

Código:

insert into bd1.table1
(title,introtext,created, fulltext)
select title,hometext,time,bodytext from bd2.table2

Seguire investigando ^^

Bueno, x lo visto FULLTEXT es una palabra reservada U_U , si pongo ' tampoco funciona U_U alguna sugerencia?

Reedito : ahora probando con ` funciona perfecto ^^

roman 30-05-2007 23:14:34

Usa los apóstrofes inversos ` para delimitar el nombre del campo.

// Saludos

NeWsP 30-05-2007 23:25:46

Gracias roman ^^ otra vez

al final edite mi mensaje sin ver que habias escrito.

Muchas gracias

vtdeleon 31-05-2007 02:20:40

Cita:

Empezado por roman
Usa los apóstrofes inversos ` para delimitar el nombre del campo.

Por qué?

Saludos

vtdeleon 31-05-2007 02:22:41

Ya ya, ya vi. Me pasa por no leer todo.


La franja horaria es GMT +2. Ahora son las 21:50:37.

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