Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

Aplicar Filtro - Al Abrir Formulario

Estas en el tema de Aplicar Filtro - Al Abrir Formulario en el foro de Visual Basic clásico en Foros del Web. Tengo un formulario llamado "Solicitudes Pendientes" donde al entrar tengo un cuadro combinado llamado "penGestor" que despliega una lista de nombres (Gestores) al elegir uno ...
  #1 (permalink)  
Antiguo 15/09/2011, 09:43
 
Fecha de Ingreso: enero-2002
Mensajes: 32
Antigüedad: 22 años, 3 meses
Puntos: 0
Aplicar Filtro - Al Abrir Formulario

Tengo un formulario llamado "Solicitudes Pendientes" donde al entrar tengo un cuadro combinado llamado "penGestor" que despliega una lista de nombres (Gestores) al elegir uno de los mismos se aplica un filtro y solo quedan las solicitudes de dicho gestor.

Se aplica con el evento "Despues de Actualizar" el siguiente codigo :

=AplicaFiltropen('Solicitudes Pendientes')

Lo que yo necesito es que al abrir el formulario se filtre automatiamente las solicitudes del usuario que esta logeado en la base de datos. Para ello tengo un cuadro de texto donde figura el usuario logeado llamado "UsuarioAct".

En el evento al abrir del formulario coloque :

penGestor = UsuarioAct

Entonces "Al Abrir" el formulario figura ya el nombre del usuario, solo me falta que se filtre automaticamente.

No se como escribir este codigo "=AplicaFiltropen('Solicitudes Pendientes')" dentro del evento "Al Abrir".

Espero que se entienda, muchas gracias.!
__________________
luca !!
  #2 (permalink)  
Antiguo 15/09/2011, 14:26
Avatar de lokoman  
Fecha de Ingreso: septiembre-2009
Mensajes: 502
Antigüedad: 14 años, 7 meses
Puntos: 47
Respuesta: Aplicar Filtro - Al Abrir Formulario

Hola!
Como que no se entiende bien...debes ser mas explicito:
• No existen eventos llamados "Despues de Actualizar", "Al Abrir", "=AplicaFiltropen('Solicitudes Pendientes')" o controles llamados "cuadro combinado"

Segun deduzco:
• Tienes unas subrutinas o funciones llamadas "Despues de Actualizar", "Al Abrir", "=AplicaFiltropen('Solicitudes Pendientes')"
• Tienes un COMBOBOX llamado "cuadro combinado"

Si esto es asi:
• En el EVENTO CLICK del COMBOBOX puedes llamar a tu subrutina "AplicaFiltropen('Solicitudes Pendientes')" (EL SIGNO DE IGUAL [=] NO VA SI ES UNA SUBRUTINA)

Te debe quedar mas o menos as:

Código vb:
Ver original
  1. '
  2. Private Sub Form_Load()
  3.    'PRIMERO CARGAR EL NOMBRE DEL USUARIO EN UN TEXTBOX ??
  4.    txtUsuario.text = UsuarioAct
  5.  
  6.    'SEGUNDO CARGAR EL COMBOBOX CON LOS GESTORES
  7.    Call Carga_Gestores
  8.  
  9.    'VALIDAR SI EL COMBOBOX ESTA LLENO Y APLICAR EL FILTRO DE LUGAR
  10.   If cboComboBox.List (0)<>Empty then cboComboBox.text = cboComboBox.List(0)
  11. End Sub
  12.  
  13. Private Sub cboComboBox_Click ()
  14. 'APLICA EL FILTRO
  15.   Call AplicaFiltropen('Solicitudes Pendientes')
  16. End Sub
  17. '

Como dije, estoy adivinando porque no se entiende (por lo menos yo), acláranos los puntos (y postea el codigo) para poder ayudarte mejor!!!

Etiquetas: formulario, filtros
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 04:26.