Busqueda de registros en Access
Publicado por sebastian (2 intervenciones) el 14/01/2015 18:29:01
Buenas tardes gente, estoy haciendo un ABM sencillo, pero estoy teniendo problemas en la busqueda de registros,
El codigo de la busqueda lo encontre en la red, el problema es que solo me muestra un solo registro (puede haber mas de uno con el mismo campo de la busqueda, pero solo me muestra el primero cargado)
Aca dejo el codigo que utilizo. Les agradezco quien pueda darme una manito, gracias!
Private Sub Button12_Click(sender As System.Object, e As System.EventArgs) Handles Btnbuscar.Click
Dim FilaEncontrada() As DataRow = midataset.Tables("inventario").Select("Nomenclatura LIKE '%" & txtbuscar.Text & "%'")
If FilaEncontrada.Length > 0 Then
' Si encontro al menos 1 registro, me posiciono en el primero que encontre. asignandome el indice de mi dataset.
registroactual = midataset.Tables("inventario").Rows.IndexOf(FilaEncontrada(0))
' Muestro el registro
Call cargar(registroactual)
Else
MsgBox("No se encontro la busqueda.", MsgBoxStyle.Exclamation, "Búsqueda.")
End If
End Sub
El codigo de la busqueda lo encontre en la red, el problema es que solo me muestra un solo registro (puede haber mas de uno con el mismo campo de la busqueda, pero solo me muestra el primero cargado)
Aca dejo el codigo que utilizo. Les agradezco quien pueda darme una manito, gracias!
Private Sub Button12_Click(sender As System.Object, e As System.EventArgs) Handles Btnbuscar.Click
Dim FilaEncontrada() As DataRow = midataset.Tables("inventario").Select("Nomenclatura LIKE '%" & txtbuscar.Text & "%'")
If FilaEncontrada.Length > 0 Then
' Si encontro al menos 1 registro, me posiciono en el primero que encontre. asignandome el indice de mi dataset.
registroactual = midataset.Tables("inventario").Rows.IndexOf(FilaEncontrada(0))
' Muestro el registro
Call cargar(registroactual)
Else
MsgBox("No se encontro la busqueda.", MsgBoxStyle.Exclamation, "Búsqueda.")
End If
End Sub
Valora esta pregunta
0
