Migrar Registros

[feliz-58]

Empezado por Casimiro Notevi

No somos adivinos y no vemos tu ordenador/computadora.

Puse la imagen, no entiendo el porqué de tu sarcasmo, por si acaso, uso delphi 7.

[Casimiro Noteví]

Empezado por feliz-58

Puse la imagen, no entiendo el porqué de tu sarcasmo, por si acaso, uso delphi 7.

No es sarcasmo
Digo que no somos adivinos porque dices que tan solo puedes traspasar una cantidad determinada de registros, pues necesitamos ver el código fuente que estás usando y la estructura de la base de datos destino.

[feliz-58]

Empezado por Casimiro Notevi

No es sarcasmo
Digo que no somos adivinos porque dices que tan solo puedes traspasar una cantidad determinada de registros, pues necesitamos ver el código fuente que estás usando y la estructura de la base de datos destino.

El migrado no lo hice a través de delphi, lo hice desde el mismo SQL Server importando el fichero de base de datos Access.

En su defecto, si hay alguna forma en Delphi, de buscar dentro del fichero txt y Seleccionar la información necesitada, seria un éxito.

[Casimiro Noteví]

Empezado por feliz-58

El migrado no lo hice a través de delphi, lo hice desde el mismo SQL Server importando el fichero de base de datos Access.
En su defecto, si hay alguna forma en Delphi, de buscar dentro del fichero txt y Seleccionar la información necesitada, seria un éxito.

Lo tienes fácil si los campos están separados por un carácter |

[feliz-58]

Empezado por Casimiro Notevi

Lo tienes fácil si los campos están separados por un carácter |

He estado buscando, pero solo he visto lecturas de TXT y comprobar si existen palabras...

[Casimiro Noteví]

Pues eso es, un fichero TXT y encontrar palabras, en este caso una palabra de longitud 1.
Ya sabes, abres el TextFile y la conexión a la BD.

 Lees línea a línea hasta eof del fichero.
   Primer campo hasta el primer |
   Segundo campo hasta el segundo |
   Saltas un |
   Tercer campo hasta el siguiente |
   Guardas en la BD los campos
Finalmente, cierras el fichero.

Y listo.

[Casimiro Noteví]

¿Has conseguido hacerlo?
¿Necesitas alguna ayuda?

[feliz-58]

Empezado por Casimiro Notevi

Pues eso es, un fichero TXT y encontrar palabras, en este caso una palabra de longitud 1.
Ya sabes, abres el TextFile y la conexión a la BD.

 Lees línea a línea hasta eof del fichero.
   Primer campo hasta el primer |
   Segundo campo hasta el segundo |
   Saltas un |
   Tercer campo hasta el siguiente |
   Guardas en la BD los campos
Finalmente, cierras el fichero.

Y listo.

Hasta ahora buscando solo tengo esto, que es para leer caracter por caracter, pero no se como hacer que haga lo que quiero.

Código Delphi [-]
var
Lista: TStringList;
cadena ,Registro,cadena2:string;
I, k, j: Integer;
begin
  Lista:= TStringList.Create;
  try
   Lista.LoadFromFile('c:\RNC.txt');
   for I := 0 to Lista.Count - 1 do
   begin
    cadena:= Lista.Strings[i];
    k:=Length(cadena);
    for j := 0 to k do
     begin
     cadena2:=Copy(cadena,j,1);
     if cadena2='|' then
      begin
       ShowMessage(Registro);
       Registro:='';
      end
     
      else
       begin
       Registro:=Registro + cadena2;
       end
 
    end;
 
   end;
  
  finally
    Lista.Free;
 end;

end;

Si supiera como hacerlo no estaría aquí...
Mi fuerte es la reparación de laptops, Lcd, plasmas, y alguna que otra cosa dentro de la electronica, no la elaboración de código, la elaboración de código lo hago porque me gusta aprender programación.