Hola a todos tengo un problema, tengo un form para actualizar datos (editar o eliminar), pero dado que son muchos productos no utilizo un datacombo, para esto he creado un buscador, es decir ingreso una cadena en un textbox, hago click en un comado buscar y me carga otro form donde me aparecen todas las coincidencias en un datalist, al hacer click en alguno de ellos me pasa los datos al form, el problema es que una vez que pasa los datos me carga no logro conseguir que ya teniendo el cod de un producto se cargen todos sus datos en el form, cuando son pocos datos utilizo un datacombo que al hacer click, realiza la carga de datos, quisiera saber que metodo, propiedad o evento puedo utilizar para que una vez que se descarge el form buscar, me carge los datos del producto selecionado, aqui les anexo el codigo del datacombo, necesitaria adapatarlo o si ustedes me recomiendan algo diferente se los voy a agradecer ([email protected]):
Private Sub dbcboTienda_Click(Area As Integer)
Dim rs As New ADODB.Recordset
If Area <> 2 Then Exit Sub
NoChange = True
With rs
.ActiveConnection = cn
.CursorType = adOpenStatic
.CursorLocation = adUseClient
.Source = "SELECT * FROM Tienda WHERE CodTie='" & dbcboTienda.BoundText & "'"
.Open
End With
If rs.RecordCount = 0 Then
MsgBox "No hay Tiendas"
GoTo DestroyRS
End If
txtNombre.Text = rs!NomTie
txtDireccion.Text = rs!DirTie
txtTelefono1.Text = IIf(IsNull(rs!TelTie1), "", rs!TelTie1)
txtTelefono2.Text = IIf(IsNull(rs!TelTie2), "", rs!TelTie2)
txtPorcentajeUtilidad.Text = rs!PorUtiTie
NoChange = False
cmdEliminar.Enabled = True
DestroyRS:
rs.Close
Set rs = Nothing
End Sub