Autor Tema: [SOLUCIONADO] Llenar combobox con datos de una Base de Datos!  (Leído 11237 veces)

0 Usuarios y 3 Visitantes están viendo este tema.

Desconectado Jarmandaros

  • -*-Miembro Eterno-*-
  • The Communiter-
  • *****
  • Mensajes: 3873
  • -^- Despicable Member -^-
    • Jarmandaros Blog
[SOLUCIONADO] Llenar combobox con datos de una Base de Datos!
« : septiembre 30, 2008, 12:50:29 pm »
Que tal Gente!!

Necesito de su ayuda pra solucionar un problema que tengo con un formulario en Visual Fox 6.0.

el problema es el siguiente:

tengo 2 combobox,



el combo1 lo tengo relacionado con la base de datos "X"

cuando me carga el form se autollena el combo1 con los datos de la base "X", pero cuando selecciono un dato en el combo1 quisiera que se llenara el combo2 con los datos de la base "Y".

el codigo con el cual pense que me funcionaria es el siguiente:

Código: [Seleccionar]
if !empty(this.value)
thisform.combo2.enabled = .T.
j = "select nplanilla from genplanilla where !deleted() and estado = .T. and idproyecto = this.value   INTO CURSOR cemp"
ThisForm.combo2.RowSourceType = 0
ThisForm.Combo2.RowSource = j
ThisForm.combo2.RowSourceType = 3
ThisForm.combo2.Requery()

else
thisform.combo2.enabled = .F.
endif

pero no carga nada en el combo2 :sad:

talvez puedan echarme una mano, de antemano Gracias.  :friends:
« Última Modificación: noviembre 12, 2008, 05:20:12 pm por Jarmandaros »
Queres Vender o Comprar un producto X? unite al grupo del Tiangue! en Facebook, solo necesitas una cuenta en FB. EL Tiangue!
Visita mi Blog

Desconectado Jarmandaros

  • -*-Miembro Eterno-*-
  • The Communiter-
  • *****
  • Mensajes: 3873
  • -^- Despicable Member -^-
    • Jarmandaros Blog
Re: Llenar combobox con datos de una Base de Datos!
« Respuesta #1 : octubre 01, 2008, 07:29:41 pm »
Pues con la gran ayuda que recibi de la comunidad  :roll:

le encontre solucion a mi problema, asi quedo el codigo y me esta funcionando como yo queria.

Código: [Seleccionar]
if !empty(this.value)
thisform.combo2.enabled = .T.
j = "select nplanilla from genplanilla where idproyecto = this.value   INTO CURSOR cemp"
ThisForm.combo2.RowSourceType = 0
ThisForm.Combo2.RowSource = j
ThisForm.combo2.RowSourceType = 3
ThisForm.combo2.Requery()

else
thisform.combo2.enabled = .F.
endif

Gracias a todos  :friends:
Queres Vender o Comprar un producto X? unite al grupo del Tiangue! en Facebook, solo necesitas una cuenta en FB. EL Tiangue!
Visita mi Blog

Desconectado rcguillen

  • -^- Elite Silver -^-
  • The Communiter-
  • *
  • Mensajes: 2320
Re: Llenar combobox con datos de una Base de Datos!
« Respuesta #2 : octubre 02, 2008, 07:49:08 am »
Lastima que llegamos tarde para ayudar..

pero bueno este codigo le servira a otros..

Gracias.!!
-:Rcguillen-NoMercy:-
-:Es inutil hacer cualquier cosa a prueba de tontos, porque los tontos son muy ingeniosos:-