VB6 - caricare e salvare files su listview

[ink--]

come faccio a caricare e salvare dei dati da files in una listview?

[Giulio C.]

Ciao.
Per popolare una ListView io utilizzo questo metodo:

Esempio: utilizzo di una ListView di tipo "report" con griglie.
Le varie opzioni possono essere scelte nella voce "Personalizzate" scheda Proprietà della ListView.

' Creazione da codice delle intestazioni - esempio di n. 3 colonne con diverso allineamento dati

ListView1.ColumnHeaders.Add , , "I colonna", 1500
ListView1.ColumnHeaders.Add , , "II colonna", 1500, lvwColumnRight
ListView1.ColumnHeaders.Add , , "III colonna", 1500, lvwColumnCenter

Per aggiungere i dati nelle varie righe dichiaro questa variabile pubblica in un modulo "bas":

Public RigaLV as ListItem

In ogni ListView che voglio popolare con i dati desiderati:

Set RigaLV = ListView1.ListItems.Add(, , "dato da elencare sulla I colonna")
RigaLV.SubItems(2) = "dato da elencare sulla II colonna"
RigaLV.SubItems(3) = "dato da elencare sulla III colonna"

Queste ultime righe di codice vanno gestite magari da un ciclo.

Per esempio, se voglio popolare la ListView con i dati di un recordset di un database, ti posto un pezzo di codice di un mio programma:

With rstDitte
   .MoveFirst
   While Not .EOF
      On Error Resume Next    ' In caso di lista vuota
      Set RigaLV = ListView1.ListItems.Add(, , !Campo1)
      RigaLV.SubItems(1) = !Campo2
      RigaLV.Subitems(2) = !Campo3
     .MoveNext
   Wend
End With

Spero di esserti stato utile. Fammi sapere.

[ink--]

si fin qui credo di esserci arrivato

[Giulio C.]

Non avevo dubbi...
ma se fossi stato più chiaro...

[ink--]

avendo un file txt con all'interno dei dati tipo
testo1:testo2
testo1:testo2
testo1:testo2

dovrei fare in modo che "testo1" finisca nella prima colonna e "testo2" nella seconda
poi per ogni linea si aggiunga una riga nella listview

il risultato vorrei fosse questo:

COLONNA 1 - COLONNA 2
1 testo1 - testo2
2 testo1 - testo2
3 testo1 - testo2
4 testo1 - testo2

[ink--]

:UP:

[ink--]

:UP: