Bonjour tout le monde,
J’ai une table (T_Etudiant) Id_Etudiant,non,date_naica et une table (T_notes_Etudiant) Id_Note,Id_Etudiant,note observations ,.............
Un formulaire F_Etudiant et un sous formulaire SF_Notes (champ pere et fils =T_Etudiant)
Dans le sous formulaire SF_Notes le (Id_Note) s'icrement grâce au code suivant:
Mon souci est que lorsque je click sur un champ dans le sous formulaire dans la première ligne le Id_Note prend la valeur 1.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Private Sub Form_BeforeInsert(Cancel As Integer) Dim NextIssueNo As Integer Dim DB As Database Dim Rst As Recordset Set DB = CurrentDb() Set Rst = DB.OpenRecordset("SELECT Id_Note FROM T_notes_Etudiant order by Id_Note desc;") If Rst.RecordCount = 0 Then NextIssueNo = 1 Else Rst.MoveLast NextIssueNo = Rst(0) + 1 End If Rst.Close Me.Id_Note= NextIssueNo End Sub
Mon problème est que si je passe à la 2 ligne et je click sur n'importe qu'il champ la valeur de Id_Note prend la valeur 2 même si je n'ai pas encore finir la saisie de la 1 ligne et dans la table (T_notes_Etudiant) je trouve seulement les Id_Note sans d'autres données.
Alors y'a-t-il un moyenne d'arrêter l'incrémentation de Id_Note jusqu’à la saisie de tous les champs de la ligne précédente.
Merci d'avance.
Partager