ciao gibra! buon giorno! son riuscito a far qualcosina! ora la mia applicazione riesce a vedere le 3 categorie e riesco a visualizzare anche la somma dei valori che spendo per ognuna! e fin qui perfetto. ma non riesco a creare la parte riguardante i nodi figli!! posto il mio codice
Dim db As ADODB.Connection
Dim rs As ADODB.Recordset
Dim MNode As Node
Dim lvwItem As ListItem
Private Sub LoadTree()
Dim i As Integer
Set MNode = treeview1.Nodes.Add(, , "sc", "Super Categorie")
rs.MoveFirst
For i = 0 To rs.RecordCount - 1
With treeview1.Nodes
Set MNode = .Add("sc", 4, rs.Fields("categoria1"), rs.Fields("categoria1") & " " & rs.Fields("total") & " € ")
End With
rs.MoveNext
Next i
rs.Close
Set MNode = Nothing
End Sub
Private Sub Form_Load()
Dim SQL As String
SQL = "SELECT categoria1,sum(tot)as total from misurazioni where designazione='------------ TOTALE MISURAZIONI ----------------->>' group by categoria1"
Set db = New ADODB.Connection
db.CursorLocation = adUseClient
db.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\prova.mdb"
Set rs = New ADODB.Recordset
rs.Open SQL, db, adOpenDynamic, adLockOptimistic
LoadTree
End Sub
all'interno della tabella misurazioni, voglio entrare tramite le categorie, nelle sotto categorie! che codice devo realizzare?