RECUPERACIÓN DE PROGRAMACIÓN
Realizar el siguiente modelado en tablas
- Las tablas deben reflejar todos los atributos que corresponden como en la imagen
Tabla CAMIONERO
Tabla CAMIONES
Tabla PAQUETES
Tablas CIUDAD
- Crear una relación como se muestra en el diagrama (para ello se debera agregar el id de camiones a camionero, el id paquete a camionero y por ultimo el id de ciudad a paquete)
- Realizar formulario para dar de alta registros a cada tabla
- Colocar botones para poder pasar del formulario CAMIONERO a PAQUETES, CAMIONERO a CAMIÓN y PAQUETES a CIUDAD
NOTA: CÓDIGO PARA ALTA
leerdatos
Set db = CurrentDb()
Set rs = db.OpenRecordset(var, dbOpenDynaset)
rs.AddNew
rs!Matricula = Val(Matri.Value)
rs!Nombre = Me.Nomb.Value
rs!Apellidos = Me.Apelli.Value
rs!Estatura = Val(Alto.Value)
rs!Tipo_de_sangre = Me.Sangre.Value
rs!Telefono_246 = Val(Tel.Value)
rs!Grado = Val(Grad.Value)
rs!Grupo = Val(Grup.Value)
rs!Fecha_nacimiento = Val(Fecha.Value)
rs!Curp = Me.lacurp.Value
rs.Update
MsgBox "Se han guardado los datos", vbImfotmation, "Aviso"
rs.Close