Ciao,In questa treeview ci sono dei nodi che mi vengono inseriti quante sono le righe trovate tramite una query,come posso fare se il nodo ha lo stesso nome a farlglielo inserire 1 sola volta e basta?
Grazie
Qui vi posto uno screenshot per farvi capire.
Questo invece è il codice:
codice:Dim RicercaAll As New System.Data.SqlServerCe.SqlCeCommand("SELECT DISTINCT ORDATA,ORCODCLI,ORRAGSOC,ORNUMORD FROM Ordini ORDER BY ORCODCLI ASC", ConnSqlCe) ConnSqlCe.Open() Dim rs2 As Data.SqlServerCe.SqlCeResultSet = RicercaAll.ExecuteResultSet(Data.SqlServerCe.ResultSetOptions.Scrollable) RicercaAll.ExecuteReader() Do While rs2.Read If rs2.IsDBNull(0) = False Then ORDATA = CStr(rs2.GetValue(0)) If InStr(ORDATA, "'", CompareMethod.Text) Then ORDATA = ORDATA.Replace("'", "''") End If Else ORDATA = " " End If If rs2.IsDBNull(1) = False Then ORCODCLI = CStr(rs2.GetValue(1)) If InStr(ORCODCLI, "'", CompareMethod.Text) Then ORCODCLI = ORCODCLI.Replace("'", "''") End If Else ORCODCLI = " " End If If rs2.IsDBNull(2) = False Then ORRAGSOC = CStr(rs2.GetValue(2)) If InStr(ORRAGSOC, "'", CompareMethod.Text) Then ORRAGSOC = ORRAGSOC.Replace("'", "''") End If Else ORRAGSOC = " " End If If rs2.IsDBNull(3) = False Then ORNUMORD = CStr(rs2.GetValue(3)) If InStr(ORNUMORD, "'", CompareMethod.Text) Then ORNUMORD = ORNUMORD.Replace("'", "''") End If Else ORNUMORD = " " End If Dim Childname1, Childname2, Childname3 As String Childname1 = ORCODCLI & " " & "(" & ORRAGSOC & ")" childNode = rootNode.Nodes.Add(Childname1) Childname2 = ORDATA childNode2 = childNode.Nodes.Add(Childname2) childNode2.Tag = ORCODCLI Childname3 = ORNUMORD & " " & "(" & ORCODCLI & ")" childnode3 = childNode2.Nodes.Add(Childname3) childnode3.Tag = ORCODCLI Loop ConnSqlCe.Close()


Rispondi quotando