Formulario para ingreso de gastos (II)

Ya tenemos ahora cargado nuestros comboboxes y a través de su valor actual le hemos asignado un valor a las variables lugar y material. A su vez hemos copiado sus valores a sendos textbox para confirmarlos visualmente. La cantidad de materiales la escribimos directamente en el valuebox , y la fecha la seleccionaremos desde el Datebox al efecto.

Entonces estamos ya en condiciones de llamar al procedimiento que nos va a guardar los datos en la tabla gastos de nuestra base de datos

Public Sub Btnaceptar_Click()
Btnaceptar.enabled = False      ‘bloqueamos el boton aceptar
DateBox1.Mode = 0                   ‘ponemos el datebox en modo solo fecha(Date)
Try hconn.EXEC(“insert into gastos values (NULL,&1,&2,&3,&4)”, material, lugar, Vbxcantidad.value, DateBox1.value)             ‘tratamos de insertar los valores

Catch                          ‘capturamos el error, si lo hubiera
Message.Error(“Imposible introducir los datos solicitados”)

End

Si prestamos atención, veremos que a este procedimiento le falta algo, porque no estamos restando los materiales gastados. Eso será modificado más adelante, por ahora a los efectos de ir probando el sistema, nos quedaremos con el código así.

Anuncios
Esta entrada fue publicada en programación y etiquetada , , . Guarda el enlace permanente.

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s