• Domingo 22 de Diciembre de 2024, 16:57

Autor Tema:  Re: Pasar datos aun listbox  (Leído 1662 veces)

Jorge López

  • Miembro MUY activo
  • ***
  • Mensajes: 118
    • Ver Perfil
Re: Pasar datos aun listbox
« en: Sábado 18 de Enero de 2003, 15:08 »
0
datos en listbox

tengo el siguiente codigo en el form_load:

private sub form_load()
dim sistema as database
dim nombre as recordset
set sistema = Workspaces(0).Opendatabase(App.Path & "Sistema.mdb")
set nombre = sistema.Openrecorset("productos",dbOpenTable)
dim cadena as string

If nombre.recordcount > 0 then
nombre.movefirst
do while Not nombre.EOF
cadena= nombre!Nombre_del_Producto & Chr(9)
ListaIF.AddItem cadena
nombre.MoveNext
loop
end if
end sub




********************************


ok
con esto cargo los datos del campo "nombre_del_Producto" al cargar el el listbox...chevere hata aca, el problema es que solo quiero que se muestre los nombres del campo "Nombre_del_producto" PERO QUE EN EL CAMPO "TIPO" SEA =  "INFORMATICO" , es decir mi tabla tiene varios campos entre ellos los campos (nombre y tipo), en el campo tipo almaceno datos segun el tipo de producto, por ejemplo, si el producto es de tipo infromatico, en el campo tipo se guarda " Informatico", si el producto es administrativo, se guarda el texto" Administrativo", lo que quiero es que al seleccionar en el combo la option Infornatico, en el listbox se muestre solo los nombres que estan en el campo "Nombre" pero que en el campo "Tipo" sea = " Informatico"



SI ME PUEDEN AYUDAR SE LOS AGRADEZCO....



SALUDOS..........
Un fracasado es un hombre que ha cometido un error pero que no es capaz de convertirlo en experiencia.

thedoctor

  • Nuevo Miembro
  • *
  • Mensajes: 22
    • Ver Perfil
Re: Pasar datos aun listbox
« Respuesta #1 en: Domingo 19 de Enero de 2003, 01:48 »
0
Te suena de algo el SQL; es lo que necesitas.

hjom

  • Nuevo Miembro
  • *
  • Mensajes: 20
    • Ver Perfil
    • http://www.hjom.itgo.com
Pasar datos aun listbox
« Respuesta #2 en: Domingo 19 de Enero de 2003, 09:03 »
0
Hay que saber que el listbox muestra todo lo que se le alla agregado, osea si agregas un numero o una palabra el te los muestra.

Existen varias formas pero creo que las mas efectivas puede ser las dos formas de solucion:

1) creas una segunda lista llamada 'list2', en la propiedad 'Visible=False' esto es para que no se vea (lo que quiero decirte es que cargas todos los datos al list2 y despues cargas en el list1 solo lo que filtres) comparando nombre.campo='<dato>' si es igual entonces agrege el nombre.campo en la lista1.

2) utilizando SQL ()
HJOM