Ver Mensaje Individual
  #19 (permalink)  
Antiguo 18/11/2009, 07:46
Giufantasy
 
Fecha de Ingreso: octubre-2009
Mensajes: 63
Antigüedad: 15 años, 4 meses
Puntos: 0
De acuerdo Respuesta: Perdida de dato en TextBox

Amido Eduardo, muchas gracias por la ayuda
pero al momento de arrreglar el treeView como lo dices tu

1.
Private Sub cargarNodos()
2.
Using cn As New SqlConnection("Server=.;database=pruebas;integrate d security=true")
3.
'Consulta para nodos hijos
4.
Using cmd As New SqlCommand("select m.nombre, f.nombre from formulario as f join menu as m on f.idmenu = m.idmenu", cn)
5.
Using da As New SqlDataAdapter(cmd)
6.
Dim ds As New DataSet
7.
'Crear datatable con los registros para los nodos hijo
8.
da.Fill(ds, "hijo")
9.
'Consulta nodos padres
10.
cmd.CommandText = "select nombre from menu"
11.
'Crear datatable con los registros para los nodos padre
12.
da.Fill(ds, "padre")
13.
'Bucle para llenar nodos padre
14.
For Each dr As DataRow In ds.Tables("padre").Rows
15.
Me.TreeView1.Nodes.Add(dr(0).ToString(), dr(0).ToString())
16.
Next
17.
'Bucle para llenar nodos hijo
18.
For Each dr As DataRow In ds.Tables("hijo").Rows
19.
Me.TreeView1.Nodes(dr(0).ToString()).Nodes.Add(dr( 1).ToString())
20.
Next
21.
End Using
22.
End Using
23.
End Using
24.
End Sub

da error en el for each, y el error es el siguiente:

Referencia a objeto no establecida como instancia de un objeto

Saludos