[MOVIDO]-Acerca de Filtrar 3 combobox y mostrar resultado en grilla. Usando VB6 y Access

[Mr_Doctor]

Les Cuento el problema siguiente

Tengo que desarrollar un sistema telefonico en visual basic 6.0 con base de datos en access
  Para aquello estoy utilizando 3 combobox y un datagrid en un formulario los cuales deben estar asociados de la siguiente manera.

tengo 4 tablas

Establecimiento
- cod_establecimiento
- descripcion

Servicio
- cod_servicio
- descripcion
-cod_establecimiento

Unidad
- cod_unidad
- descripcion
-cod_sercivio

Usuario

- nombre
- telefono1
-telefono2
-cod_servicio

el primer combobox debe desplegar una lista de establecimientos , una vez seleccionado el establecimiento este tiene que desplegar los servicios de dicho establecimiento en el combobox2 .
Luego al seleccionar el servicio, este tiene que mostrar en el combobox 3 las unidades relacionadas al servicio. Y finalmente cuando selecciono en el combobox 3 la unidad, me tiene que mostrar en el datagrid de la parte baja del formulario el usuario y sus numeros de telefono.

queria saber como podria hacerlo para asociar esos combobox y finalmente se muestre la informacion en la grilla.

Saludos

[gulabyte]

supongo que la idea sería agregar los objetos de los combos mediante código: en el primer combo metes la lista que es fija y después que la lista del segundo combo se genere cuando le das click al objeto del combo, es decir algo como....

Código [Seleccionar] Expandir

Private sub combo1_click...
   Select Case combo1.selecteditem
      Case "noseke"
         combo2.additem...
         combo2.additem...
         combo2.additem...
         combo2.additem...
      Case "nosekuantos"
         combo2.additem...
         combo2.additem...
         combo2.additem...
         combo2.additem...
    End Select
End sub

y lo mismo con los otros combos...

no sé como tienes que usar access y eso... es una idea


salu10!!

[Mr_Doctor]

muchas gracias amigo , intentare eso y te cuento, aun mas opiniones son bienvenidas.

Saludos

[Mr_Doctor]

me dio un error de Method or data member not found.


Private Sub Combo1_Click()
  Select Case Combo1.selecteditem
    Case "Servicio de Salud"
         Combo2.AddItem "direccion"
         Combo2.AddItem "auditoria"
         Combo2.AddItem "recursos humanos"
         Combo2.AddItem "tesoreria"
      Case "Hospital Base"
         Combo2.AddItem "pediatria"
         Combo2.AddItem "cirugia"
         Combo2.AddItem "dental"
         Combo2.AddItem "nutricion"
    End Select
End Sub

[gulabyte]

lo de selecteditem creo que tienes que ponerlo así: Combo1.ItemData(Combo1.ListIndex)....

[ssccaann43 ©]

Mira... primero que nada debes saber como listar el contenido de un campo de la tabla que creaste en el COMBO...

Para ello puedes ver este enlace

Luego que hagas eso, lo que tienes que generar son QUERYS SQL "Consultas", donde lo que selecciones en el combo filtre y pues te muestre lo que filtraste en otro.

Revisa eso y cuentanos... 

[seba123neo]

Hola,es facil solo tenes que ir armando la consulta sql segun lo que vas seleccionando en los combos...

saludos.

[Mr_Doctor]

Podrias darme un ejemplo de las consultas
tendria que colocarlas en el codigo del combobox 3?  es necesario añadir algun codigo al datagrid?

La idea es que cada vez que seleccione en el combobox 3 (despues de haber pasado todo el filtro de los combobox anteriores) entonces  se muestre en el datagrid la informacion correspondiente de cada unidad (por lo que se desplega la lista de usuarios en el datagrid).

por eso me pregunto si no se puede cargar la lista de un combobox desde los campos de una tabla?.


saludos

[Angeldj27]

Claro que lo puedes hacer.
Lo que debes hacer es setear el datagrid con la tabla y desde los combo llamas el evento click del combo3 haci seria mas o menos si hay dudas postea

Saludos...

[ssccaann43 ©]

Prepararé un ejemplo, pero a ver si buscas información o lees un poco... No hacemos tareas...