Sauvegarder plusieurs enregistrements

Fermé
Lolo - 18 avril 2012 à 09:12
OlivrT Messages postés 323 Date d'inscription lundi 2 novembre 2009 Statut Membre Dernière intervention 24 mai 2012 - 19 avril 2012 à 21:35
Bonjour,

J'ai une base de donnée sous Access 2000 et je cherche, à partir d'un formulaire, à sauvegarder plusieurs enregistrements pour un même identifiant

Exemple:

Dans le formulaire "Note", j'ai remplit automatiquement le champs "identifiant_etudiant" qui prend la valeur du formulaire précédent.
J'aimerais qu'en cliquant sur un bouton "suivant", cela m'enregistre les champs du formulaire (identifiant, matiere, note, appreciation), et que cela me propose un nouvel enregistrement, avec le même "identifiant_etudiant".
Car dans ma base de données, si je remplis une seconde fois, cela m'écrase la première donnée
(La table note possède comme clé primaire "identifiant_etudiant" et "matiere")


Merci d'avance pour votre aide.
Cordialement,

A voir également:

1 réponse

OlivrT Messages postés 323 Date d'inscription lundi 2 novembre 2009 Statut Membre Dernière intervention 24 mai 2012 36
19 avril 2012 à 21:35
Bonjour,
ajoutez un bouton à votre formulaire et dans l'évènement On_Click,
je ne connais pas le nom de vos contrôles, donc j'appellerai txt_IDEtudiantActuel le nom de la zone où se trouve l'identifiant de l'étudiant.

Ajoutez ceci :

Private Sub btnNewNote_Click()

On Error GoTo Err_btnNewNote
    
   Dim IDEtudiantActuel as Long
   'Récupérer l'identifant actuel 
    IDEtudiantActuel = Me.txt_IDIdentifiantEtudiant

    'Ajout d'un nouveau record
    DoCmd.GoToRecord , , acNewRec
   
    'Alimenter la zone avec l'identifiant "Précédent"
    Me.txt_IDIdentifiantEtudiant = IDEtudiantActuel 
    

Exit_btnNewNote:
    Exit Sub

Err_btnNewNote:
    MsgBox Err.Description
    Err.Clear
    Resume Exit_btnNewNote
    
End Sub


0