questo è il codice di un mio programma...
la tabella in questione è formata da 3 colonne....
a te stà il compito di adattarlo...
Codice PHP:
Public rec As New Recordset
Private Sub Form_Load()
CreaColonne
RiempiLista
End Sub
Public Sub CreaColonne()
lstIscritti.ColumnHeaders.Add , , "Codice", 1500, lvwColumnLeft
lstIscritti.ColumnHeaders.Add , , "Materia", 1500, lvwColumnLeft
lstIscritti.ColumnHeaders.Add , , "Soggetti", 5000, lvwColumnLeft
End Sub
Public Sub RiempiLista()
rec.Open "SELECT * FROM soggetti", db, adOpenDynamic, adLockPessimistic
lstIscritti.ListItems.Clear
For i = 0 To rec.RecordCount - 1
With lstIscritti.ListItems.Add
.text = rec.Fields(0).Value
.SubItems(1) = rec.Fields(1).Value
.SubItems(2) = rec.Fields(2).Value
End With
rec.MoveNext
Next
End Sub
se ti serve una mano chiedi pure...