Anónimo
Llenar tablas con combobox desde Visual Basic 6.0
Hola, soy un chavo novato en esto y espero puedan ayudarme. Tengo el siguiente problema:
He creado una pequeña base de datos en la cual tengo las tablas de:
Inventario: Clave_producto, Clave_presentación, Clave_marca, Número_compra, etc.
Tipo_presentación: Clave_presentación, descripción
Marca: Clave_marca, descripción
Compra: Número_compra, fecha_compra, hora_compra
Tengo 2 combobox en un formulario creado en Visual Basic 6.0. En uno de ellos cargué la "Descripción", de la tabla "Tipo_presentación", desde una base de datos en Access, es decir:
Paquete
Suelto
Y eso es lo que me muestra el combobox, en lugar de las claves. En el otro combobox, lo asigné a la marca y, de igual manera, me aparece sólo la descripción de la marca, por
ejemplo:
Sabritas
Bimbo
Marinela
Entonces, lo que me gustaría saber, es ¿cómo le puedo hacer para que cuando esté llenando la tabla "Inventario", desde el entorno gráfico de Visual Basic 6.0, y seleccione, por ejemplo, el combobox que contiene la marca, me guarde la "Clave_marca", en la tabla de "Inventario"?
En otras palabras, si tengo asignados en la tabla "Marca" la clave "12" y la descripción "Sabritas", supongamos que de unos 40 registros; quiero que ese "12" se asigne a la tabla de "Inventario", mediante el combobox, pues ya ven que la "Clave_marca", es la que se relaciona con esa tabla y lo que se está viendo en el combobox es la descripción y no la clave. Además, los ordené de manera alfabética y no sé si haya problema con eso.
Estoy utilizando estas intrucciones para llenar las tablas:
En este caso, este código es para llenar la tabla "Compra":
rs_ent.AddNew
rs_ent.Fields.Item(0) = label6.Caption
rs_ent.Fields.Item(1) = Label1.Caption
rs_ent.Fields.Item(2) = label2.Caption
rs_ent.Update
De hecho, no tengo problemas con llenar las otras, ya ven que está sencillo, sólo con la de "Inventario" sí, porque se involucran 3.
De antemano, muchísimas gracias y espero puedan ayudarme... Estoy completamente atorado y desesperado.
He creado una pequeña base de datos en la cual tengo las tablas de:
Inventario: Clave_producto, Clave_presentación, Clave_marca, Número_compra, etc.
Tipo_presentación: Clave_presentación, descripción
Marca: Clave_marca, descripción
Compra: Número_compra, fecha_compra, hora_compra
Tengo 2 combobox en un formulario creado en Visual Basic 6.0. En uno de ellos cargué la "Descripción", de la tabla "Tipo_presentación", desde una base de datos en Access, es decir:
Paquete
Suelto
Y eso es lo que me muestra el combobox, en lugar de las claves. En el otro combobox, lo asigné a la marca y, de igual manera, me aparece sólo la descripción de la marca, por
ejemplo:
Sabritas
Bimbo
Marinela
Entonces, lo que me gustaría saber, es ¿cómo le puedo hacer para que cuando esté llenando la tabla "Inventario", desde el entorno gráfico de Visual Basic 6.0, y seleccione, por ejemplo, el combobox que contiene la marca, me guarde la "Clave_marca", en la tabla de "Inventario"?
En otras palabras, si tengo asignados en la tabla "Marca" la clave "12" y la descripción "Sabritas", supongamos que de unos 40 registros; quiero que ese "12" se asigne a la tabla de "Inventario", mediante el combobox, pues ya ven que la "Clave_marca", es la que se relaciona con esa tabla y lo que se está viendo en el combobox es la descripción y no la clave. Además, los ordené de manera alfabética y no sé si haya problema con eso.
Estoy utilizando estas intrucciones para llenar las tablas:
En este caso, este código es para llenar la tabla "Compra":
rs_ent.AddNew
rs_ent.Fields.Item(0) = label6.Caption
rs_ent.Fields.Item(1) = Label1.Caption
rs_ent.Fields.Item(2) = label2.Caption
rs_ent.Update
De hecho, no tengo problemas con llenar las otras, ya ven que está sencillo, sólo con la de "Inventario" sí, porque se involucran 3.
De antemano, muchísimas gracias y espero puedan ayudarme... Estoy completamente atorado y desesperado.