
Buscar registros en Formulario
Publicado por Juan Diego (14 intervenciones) el 09/08/2013 19:06:14
Buscando en internet y consultando el manual de Ayuda de Access estoy intentanto hacer un cuadro de lista que al momento de dar clic me muestre todos los datos en el formulario.
De momento logre Hacer un que Captura Determinado producto. y Tengo un cuadro de Lista y Al dar Clic me muestra los detalles del producto, El Caso es que intente hacer lo mismo con un formulario Llamado Usuarios. Pero Me marca error
Este es el codigo que use para el evento del cuadro de lista despues de Actualizar:
Private Sub LISTA_PRODUCTOS_AfterUpdate()
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[ID_PRODUCTO] = " & Str(Nz(Me![LISTA_PRODUCTOS], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
El cual va muy Bien pero al momento de querer hacer lo mismo en el de USUARIOS me da error
Private Sub LISTA_USUARIOS_AfterUpdate()
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[NOMBRE_USUARIO] = " & Str(Nz(Me![LISTA_USUARIOS], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
nota. algunos de los datos del Formulario USUARIOS son de tipo si/no
Espero su ayuda gracias de antemano
De momento logre Hacer un que Captura Determinado producto. y Tengo un cuadro de Lista y Al dar Clic me muestra los detalles del producto, El Caso es que intente hacer lo mismo con un formulario Llamado Usuarios. Pero Me marca error
Este es el codigo que use para el evento del cuadro de lista despues de Actualizar:
Private Sub LISTA_PRODUCTOS_AfterUpdate()
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[ID_PRODUCTO] = " & Str(Nz(Me![LISTA_PRODUCTOS], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
El cual va muy Bien pero al momento de querer hacer lo mismo en el de USUARIOS me da error
Private Sub LISTA_USUARIOS_AfterUpdate()
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[NOMBRE_USUARIO] = " & Str(Nz(Me![LISTA_USUARIOS], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
nota. algunos de los datos del Formulario USUARIOS son de tipo si/no
Espero su ayuda gracias de antemano
Valora esta pregunta


0