[VB6]: Splittare file di testo

[maso1979]

ciao a tutti supponiamo che io abbia un file di nome lista_file.txt cosi fatto:

01_00_02_08_2006_16_43_34
01_00_02_08_2006_16_46_03
01_00_03_08_2006_16_48_51
01_00_03_08_2006_19_48_51
01_00_04_08_2006_19_48_51

ossia ogni riga è nel formato:
id_id_gg_mm_aaaa_hh_mm_ss

Le date sono gia in ordine.
A partire da tale file vorrei creare una funzione che apre tale file e crea un numero di file di testo pari ai giorni diversi presenti nel file lista_file con contenuto:

1°file:
01_00_02_08_2006_16_43_34
01_00_02_08_2006_16_46_03

2°file:
01_00_03_08_2006_16_48_51
01_00_03_08_2006_19_48_51

3°file:
01_00_04_08_2006_19_48_51

Qualche suggerimento???

[alka]

Con quale linguaggio?

Il Regolamento, questo sconosciuto... :rollo:

[maso1979]

vb6

[eurofolle]

Io ho avuto un problema simile e l'ho risolto così....
prima apri il file dei dati poi con il Line Input "prelevi" la riga, poi:

(Dim riga as string
dim A() as string)

Riga=riga prelevata dal file.
A = Split(Riga, "_") 'Divisione della riga in stringhe

A questo punto hai le righe divise in stringhe di singoli numeri da A(0) a A(7).

Poi io farei si che la stringa A(2) dia il nome al file e ci salverei le stringhe che mi interessano...
Cioè il nome del file è:
file="c:\" & A(2) & ".txt"
dove l'unità del disco e l'estensione del file la dici tu....
Non sarà ortodosso ma dovrebbe funzionare...
fammi sapere...