Salve
sto cercando di estrarre dei dati da 2 file ma dopo vari tentativi riesco solo ad estrarre la prima riga.
Questo è il codice del listato:
---------
CLS
OPEN "elenco1.txt" FOR INPUT AS #1
OPEN "elenco2.TXT" FOR INPUT AS #2
OPEN "finale3.TXT" FOR OUTPUT AS #3
LINE INPUT #1, A$
LEGGI:
IF EOF(2) THEN GOTO FINE
LINE INPUT #2, B$
IF MID$(A$, 1, 13) = MID$(B$, 1, 13) THEN C$ = MID$(B$, 1, 30):PRINT #3, C$:
GOTO LEGGI
FINE:
CLOSE #1
CLOSE #2
CLOSE #3
SYSTEM
----------
Questi sono gli esempi di file:
elenco1.txt (elenco dati totale)
1111111111111;a;b;c;1;2;3
2222222222222;a;b;c;1;2;3
3333333333333;a;b;c;1;2;3
4444444444444;a;b;c;1;2;3
5555555555555;a;b;c;1;2;3
6666666666666;a;b;c;1;2;3
7777777777777;a;b;c;1;2;3
8888888888888;a;b;c;1;2;3
elenco2.txt (elenco dati da estrarre e completare)
2222222222222
6666666666666
8888888888888
finale3.txt (risultato finale)
2222222222222;a;b;c;1;2;3;
6666666666666;a;b;c;1;2;3;
8888888888888;a;b;c;1;2;3;
come devo fare per aver il finale3?
Grazie per l'aiuto
Ultima modifica effettuata da barilla il 20/05/2007 alle 18:38 |