Visual Basic 6 - Popolare una FlexGrid leggendo i records in una cartella

mm..non ho capito come intendi visualizzare tutti i file contemporaneamente... cioè tu li vuoi mettere nella list uno sotto l'altro? O.o

comunque ecco qui un esempio che carica i dati di ogni file uno sotto l'altro nella msflexgrid:

Dim x As Integer, file As String, b as integer, str(1 to 1000) as string
For x = 0 To file1.listcount -1 'scorre la lista
file = file1.list(x) 'legge uno ad uno ogni elemento della lista
open "percorso\" & file for input as #1 'legge il file
do 'inizia il ciclo...
b = b + 1
line input #1, str(b) 'prende riga x riga del file...
dim tmp() as string
tmp = split(str(b), " ") 'separa le 3 parole dallo spazio
msflexgrid1.row = b '"seleziona" la riga
msflexgrid1.col = 1 'nella prima colonna (non mi ric. se parte da 0 o 1 il conteggio...)
msflexgrid1.text = tmp(0) 'inserisce la prima parola nella 1° colonna
msflexgrid1.col = 2 '"seleziona" la 2° colonna
msflexgrid1.text = tmp(1) 'inserisce la seconda parola nella 2° colonna
msflexgrid1.col = 3 'seleziona la 3° colonna
msflexgrid1.text = tmp(2) 'inserisce la terza parola nella 3° colonna
doevents
loop until eof(1) = true '...finchè non arriva alla fine del file
close #1
doevents
Next x 

Per chiarimenti posta

p.s. oggi sono MOLTO impegnato quindi non so se in caso di problemi riuscirò a risponderti ...

Ti ringrazio dell'impegno, GrG. Troppo disturbo.
Ho capito tutto quanto da te dettagliatamente spiegato.

Mi funziona 'quasi' tutto.
Nel senso che riesco a mostrare nella flexgrid
i dati, anche se non proprio nel posto dove dovrebbero stare.
Il problema é che la mia routine load/save
é impostata diversamente.

anche se ho integrato naturalmente la routine da te suggerita.

Per evitarti inutili perdite di tempo mi sono permesso
di fare una cosa, non so se si puo qui sul forum, in modo da risolvere se possibile
tutto.
Ho spolpato (momentaneamente) il mio programma ed ho lasciato solo
la parte load (con filelistbox, flexgrid). Insomma ho lasciato solo la parte
di cui stiamo parlando con la tua routine aggiunta. . Ho creato ed aggiunto un paio di files nella cartella indirizzi.
Ne ho fatto un zip che allego, quando hai tempo, se vuoi ne dai un'occhiata.
Ripeto che l'unico problema é la visualizzazione dei dati al posto giusto nella flex e mancano sulla sinistra i titoli dei files.

Se non vuoi non fa nulla, hai già aiutato abbastanza.
Ti ringrazio per questo.
Se comunque avrai tempo di migliorare il problema basta che mi posti semplicemente il codice migliorato che io poi faro' copia incolla.
Ed riattacchero' la parte del mio programma che ho eliminato momentaneamente.

Grazie ancora per il tuo squisito impegno.
RobinHood
ps. non so perché ma per caricare i files bisogna premere 2 volte su load

accidenti, il mio vb6 ha problemi, pensavo fossero collegati al winsock e invece purtroppo ce l'ho totalmente corrotto... non posso aprire il tuo sorgente mi spiace
però ho visto i files ma sono strutturati in maniera divera, c'è poi uno.text che non ha neanche uno spazio e la split che divide se non ci sono spazi... oltre a fare copia e incolla cerca anche di modificarlo il codice :P

eh temo che per rimediare a questo spiacevole inconveniente che ho dovrò formattare e quindi mi ci vorranno un pò di giorni prima di rimettere tutto come prima...

Non ti preoccupare, Grg,fai con calma. Non c'é fretta.
E' da tempo che avevo questo problema qualche giorno in piu non fa differenza !
Appena, sarai nella possibilità di dare un'occhiata
fai con tuo comodo. Sempre volendo.

Io consulto giornalmente questo forum e mi accorgero' se c'é novità al mio topic.

Ti ringrazio ancora.
ps. puo ben essere che un file é un po 'strano' o con contenuto strano, ma l'ho fatto alla svelta per poter postare questo programma ridotto ed ho messo parole a casaccio.. Comunque la struttura é quella che usa il programma normale, cioé ogni file ha 3 'campi'.
a presto
robinhood

Ok, ora ho visto...

Allora a me funziona perfettamente perchè ho strutturato meglio i file...

tu mi hai detto che la struttura era:
xxx xxx xxx

Invece nei file mi son ritrovato:
Nicola bello via romana

la cui struttura invece è:
xxx xxx xxx xxx

magari è meglio se lo strutturi tipo:
xxx~xxx~xxx

così viene:
Nicola~bello~via romana

e si evitano spiacevoli inconvenienti, anche se non del tutto.... (però devi mettere nella split come carattere separatore il "~"

Ok, Grg, tutto chiaro ed anche ....funzionante ora.

Sono stato assente alcuni giorni e solo oggi ho visto
la tua ultima risposta-tip.

Tutto ok dunque.
Ti ringrazio
robinh

prego