Visual Basic - Ayuda con consulta especifica

Life is soft - evento anual de software empresarial
 
Vista:

Ayuda con consulta especifica

Publicado por Jonathan Ponce (22 intervenciones) el 20/01/2009 16:13:14
Hola a todos los programadores.
Quiero molestarlos con una situacion con la que me tope al programar con visual basic.
No soy un experto en visual asi que ahi va.
Tengo un programa funcionando en DAO usando expresiones SQL.
Una tabla donde se guardan los eventos con sus fechas: Año, Mes, Dia, Evento
Por ejemplo, estos datos:

Año Mes Dia Evento
2007 enero 05 Cualquier evento
2007 enero 10 Cualquier evento
2007 enero 15 Cualquier evento
2007 enero 20 CUalquier evento
2007 enero 25 Cualquier evento
2007 enero 30 Cualquier evento
2007 febrero 05 Cualquier evento
2007 febrero 15 Cualquier evento
2007 febrero 20 Cualquier evento
2007 febrero 30 Cualquier evento

Ahora, en diseño he programado un combobox que tiene años registrados: 2007, 2008, etc.
Cuando se elige el año hago esto:

Set rst = dbs.openrecordset("Select * From T_Datos Where Año='" & Combo1.text & "'")
rst=variable recordset
dsb=variable database

Lo que necesito es una rutina que al elegir el año, digamos 2007, me mande en otro combo los meses registrados tambien, pero sin repetirlos, que solo me muestre uno que represente a todos los que son igual a el, ya que si hago una rutina simple de consulta me llena el combobox de varios meses repetidos.
Lo que requiero es hacer una consulta mas especifica.
(P.E. si eligo año, que me muestre que meses estan registrados con ese año, posteriormente que me muestre el dia que contiene ciertos eventos)

Podrian ayudarme porfavor. Ya que me imagino que encierra un ciclo y no soy bueno en eso. O me den una opcion de como hacer esta rutina.
GRACIAS
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ayuda con consulta especifica

Publicado por P3L30N2009 (699 intervenciones) el 20/01/2009 19:02:24
Mira, cargas el segundo combo con una consulta así:

SELECT DISTINCT Mes FROM T_Datos WHERE Año = '" & Combo1 & "'"

el tercer combo la consulta sería la siguiente:

SELECT Dia, Evento FROM T_Datos Where Año = '" & Combo1 & "' And Mes = '" & Combo2 & "'"
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Ayuda con consulta especifica

Publicado por Jonathan¨Ponce (22 intervenciones) el 22/01/2009 16:22:41
Gracias amigo, me has ayudado bastante. Esa es la rutina que andaba buscando. Gracias Por tu tiempo al responder esta nota P3L30N2009.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar