AYUDA PARA CARGAR COMBOBOX
Hola, NECESITO QUE ALGUIEN ME EXPLIQUE (con ejemplo mejor), COMO PUEDO CARGAR UN COMBO DESDE CON LOS DATOS DE UNA BD.
EXPLICAR CLARO SOY NOVATA
EXPLICAR CLARO SOY NOVATA
hola elena
te envio el codigo como llener una combo, creo que la explicacion o las dudas te la dara el programa una ves que hallas corriendo el codigo. asi sera mas facil explicartelas
SQL$ = " SELECT rut, dv, nombre, appaterno, apmaterno"
SQL$ = SQL$ & " FROM persona "
Set vgrst_Tablaexiste = Nothing
vgrst_Tablaexiste.Open SQL, vgcnn, adOpenForwardOnly, adLockReadOnly
Do While Not vgrst_Tablaexiste.EOF
cbo_nombre.AddItem vgrst_Tablaexiste!nombre
cbo_nombre.ItemData(cbo_nombre.NewIndex) = vgrst_Tablaexiste!rut
vgrst_Tablaexiste.movenext
loop
vgrst_Tablaexiste.close
te envio el codigo como llener una combo, creo que la explicacion o las dudas te la dara el programa una ves que hallas corriendo el codigo. asi sera mas facil explicartelas
SQL$ = " SELECT rut, dv, nombre, appaterno, apmaterno"
SQL$ = SQL$ & " FROM persona "
Set vgrst_Tablaexiste = Nothing
vgrst_Tablaexiste.Open SQL, vgcnn, adOpenForwardOnly, adLockReadOnly
Do While Not vgrst_Tablaexiste.EOF
cbo_nombre.AddItem vgrst_Tablaexiste!nombre
cbo_nombre.ItemData(cbo_nombre.NewIndex) = vgrst_Tablaexiste!rut
vgrst_Tablaexiste.movenext
loop
vgrst_Tablaexiste.close
