Mostrar datos en un textbox desde un treview

[Damichel]

Hola como estan
Mi consulta es la siguiente, tengo un control treeview que se carga con los valores de una bd sql. Cuando selcciono un nodo hijo..se tiene que desplegar la informacion seleccionada en unos textbox (Estoy utilizando multipage y el la primera page view es donde tengo las cajas de texto).
Ya intente hacerlo pero me aparece solo el ultimo registro de la tabla ..no el que yo seleccione.

Si alguien tiene conocimiento de como mostrar datos en una caja de texto a partir de los nodos seleccionados...agradeceria la ayuda

[sagi58]

Haz una busqueda en la tabla o RECORDSET por codigo o apellido del registro selecconado, y en la propiedad Text de las cajas, pones los datos de los campos del usuario encontrada.
Primero no olvides de crear la cadena de conexiion a la base.

AQUI TE PONGO UN EJEMPLO:

Private Sub Tree_NodeClick(ByVal Node As MSComctlLib.Node)
With cn
If .State = 1 Then .Close
.CursorLocation = adUseClient
.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\dbrentas.mdb;Persist Security Info=False"
rsCalles.Open "Select * from calles", cn, adOpenStatic, adLockOptimistic
rsUsuarios.Open "Select * from usuarios", cn, adOpenStatic, adLockOptimistic
End With

Text1.Text = Tree.SelectedItem
cod = Mid(Tree.SelectedItem, 1, 8)
rsUsuarios.Find "codigo ='" & cod & "'"
If Not rsUsuarios.EOF Then
'xcod = rsUsuarios!codigo
Text2.Text = rsUsuarios!direccion & " " & rsUsuarios!nro
Text3.Text = rsUsuarios!codigo
Text4.Text = Val(rsUsuarios!apt)
Text5.Text = Val(rsUsuarios!bpl)
Text6.Text = Val(rsUsuarios!alc)
Text7.Text = Val(rsUsuarios!tot1)
End If
End Sub

[Aquaventus]

eh sagi58 te has fijado la fecha de la publicacion? es de hace 7 años...