Compte-rendu équipe 8:

HAURAT Maxence

GRANDET Jérémy

Objet de la mission:

Notre mission est la numéro 7 qui à pour objectif de créer des formulaires de création, modification et de suppression de notes ainsi que d'un état donnant le bilan global d'un compétiteur sur une saison.

Création des formulaires:

Partie graphique:

Les formulaires sont crées directement sur ACCESS.
Ils contiennent des champs de texte et des listes permetant de saisir ou de choisir les informations.
Chaque champ et bouton ont un nom qui permet de l'utiliser dans le code VBA qui sera vu ensuite.

Partie programme:

Gestion des erreurs de saisie:

Cette série de commandes permet de contrôler si un champ est vide:

If IsNull(txt_NumEntraineur) Then MsgBox "Choisir un entraineur", vbExclamation, "Gestion Note" txt_NumEntraineur.SetFocus Exit Sub End If

Celle-ci permet de vérifier si un enregistrement est déja présent dans la table (à mettre après avoir sélectionné un enregistrement):

If rsNote.EOF() = False Then MsgBox "Cette personne a déja une note", vbCritical, "Gestion Note" Exit Sub End If

Modification de la base de données:

Penser à sélectionner la base de données et la table pour chacune de ces commandes ainsi que l'enregistrement pour la modification et la supperssion
Ajout d'un enregistrement:

rsNote.Addnew rsNote!NUM_COMPETITION = txt_Numcomp rsNote!NUM_LICENCE = txt_NumMembre rsNote!NUM_ENTRAINEUR = txt_NumEntraineur rsNote!NOTE = txt_Note rsNote.Update

Modification d'un enregistrement (dans cet exemple on ne modifie qu'un champ):

rsNote.Edit rsNote!NOTE = txt_Note rsNote.Update

Suppression d'un enregistrement:

rsNote.Delete

Documentation utilisateur:

La documentation utilisateur est disponible via le lien suivant: Documentation utilisateur

Fichiers:

Base de données (avec formulaire et état) → cliquer ici