Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Firebird e Interbase
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 23-07-2011
Avatar de pmtzg
pmtzg pmtzg is offline
Miembro
 
Registrado: jul 2007
Posts: 179
Poder: 17
pmtzg Va por buen camino
Question de paradox a firebird sin duplicar registros

hola amigos tengo una pregunta para los que transfieren de una base a otra
estoy por pasar una tabla de paradox a base de datos firebird y lo hago de la siguiente manera:
declaro mis conexiones de tablas tanto para paradox y firebird etc. .....
el codigo para pasar registros es el siguiente:
Código Delphi [-]

      For i := 0  to TablaParadox.Fields.Count -1 do
          IBTabla1.Fields[i].Value:=TablaParadox.Fields[i].Value;
          IBTabla1.Post;
          TablaParadox.Next;
etc ....


bien, ahora mi pregunta si la tablaParadox se actualiza y tengo la necesidad de nuevamente transpasar los registros de paradox a firebird, me sirve esta misma instrucción sin duplicarme lo que tengo o tengo que usar otra instrucción en donde transfiera unicamente los registros que no estan en la nueva base de datos
espero haberme explicado
Responder Con Cita
  #2  
Antiguo 23-07-2011
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.077
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Pues como tú quieras hacerlo
Puedes comprobar si existe antes de volver a grabarlo... o lo más normal es que tengas un campo clave (primary key) que no se puede repetir, así que dará error si intentas grabarlo porque ya existe y continuas con el siguiente.
En plan chapucero, con tu código, sería algo así:

Código Delphi [-]
while not TablaParadox.eof do
begin
  For i := 0  to TablaParadox.Fields.Count -1 do
    IBTabla1.Fields[i].Value:=TablaParadox.Fields[i].Value;    
  try
    IBTabla1.Post;
  except
  end;  
  TablaParadox.Next;
end;
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
no borro registros paradox xavi_romani Tablas planas 7 01-05-2011 09:38:43
duplicar registros ebeltete Firebird e Interbase 7 19-03-2009 14:09:28
Duplicar Registros Chris Firebird e Interbase 12 01-02-2008 21:35:30
paradox 7 guardar registros Mariana Conexión con bases de datos 3 12-11-2004 18:16:28
para no dejar duplicar registros en InterBase Giniromero Firebird e Interbase 5 21-06-2003 02:05:03


La franja horaria es GMT +2. Ahora son las 22:40:45.


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
Copyright 1996-2007 Club Delphi