+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 2 su 2

Importazione dati da file txt a tabella Paradox

  1. #1
    giansa non  in linea Novello
    Ciao a tutti e scusate se la domanda che sto per porvi banale, ma mi sto rendendo conto di essere un'incapace.
    Allora ho a disposizione un file txt con dei numeri e delle lettere e lo dovrei importare dentro a una tabella paradox, Ho gi preparato le tabella definendo i campi. Il dati del file txt sono separati dal tab (#9) ma non so come fare a leggere il dato che c' tra un tab e l'altro e inserirlo nel campo giusto
    Mi potete aiutare?
    Grazie

  2. #2
    flastorina non  in linea Novello
    Quote Originariamente inviato da giansa Visualizza il messaggio
    Ciao a tutti e scusate se la domanda che sto per porvi banale, ma mi sto rendendo conto di essere un'incapace.
    Allora ho a disposizione un file txt con dei numeri e delle lettere e lo dovrei importare dentro a una tabella paradox, Ho gi preparato le tabella definendo i campi. Il dati del file txt sono separati dal tab (#9) ma non so come fare a leggere il dato che c' tra un tab e l'altro e inserirlo nel campo giusto
    Mi potete aiutare?
    Grazie
    Io di solito, quando devo acquisire dei file di testo, faccio in questo modo:

    procedure TForm1.Button1Click(Sender: TObject);
    var carattere: char;
    begin
    AssignFile(FILEIN,'miofile.txt');
    RESET(FILEIN);

    WHILE NOT EOF(FILEIN) DO
    BEGIN

    read(FILEIN,carattere);
    campo1 := '';
    while carattere <> #9 do
    begin
    campo1 := campo1 + carattere;
    read(FILEIN,carattere);
    end;

    read(FILEIN,carattere);
    campo2 := '';
    while carattere <> #9 do
    begin
    campo2 := campo2 + carattere;
    read(FILEIN,carattere);
    end;

    read(FILEIN,carattere);
    campo3 := '';
    while carattere <> #9 do
    begin
    campo3 := campo3 + carattere;
    read(FILEIN,carattere);
    end;

    // le due read che seguono, le fai solo se a fine record ci sono questi caratteri
    // di solito ci sono tutti e due, a volte (se l txt viene da un altro sistema, solo #10
    read(FILEIN,carattere); // leggo il #13
    read(FILEIN,carattere); // leggo il #10

    // a questo punto faccio una insertrecord sulla mia tabella dei campi che ho ottenuto

    end;

    CloseFile(FILEIN);

    end;

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Importazione file .csv in tabella access
    Da pierovb nel forum Visual Basic 6
    Risposte: 25
    Ultimo Post: 09-12-2020, 16:29
  2. Risposte: 2
    Ultimo Post: 01-11-2018, 13:53
  3. Importazione file .csv in tabella Access
    Da pierovb nel forum Visual Basic 6
    Risposte: 16
    Ultimo Post: 06-06-2018, 11:35
  4. Risposte: 4
    Ultimo Post: 25-02-2017, 13:24
  5. Risposte: 1
    Ultimo Post: 26-11-2016, 04:26