Formulaire Ajout access

iso -  
 iso -
Bonjour,

J'ai un probléme avec un formulaire, j'ai créer un formulaire où l'on rempli des données et lorsqu'on clique sur le bouton les donnes sont ajouter à la table j'ai donc ce code qui est associé à mon bouton:

Private Sub Commande0_Click()
Dim MaTable As Recordset
Set MaTable = CurrentDb.OpenRecordset("Employe", dbOpenDynaset)
On Error Resume Next
With MaTable
.AddNew
!MATRICULE = Ajout_EMP!MATRICULE
!NOM = Ajout_EMP!NOM
!PRENOM = Ajout_EMP!PRENOM
!Tel_GSM = Ajout_EMP!Tel_GSM
!N_SECTEUR = Ajout_EMP!N_SECTEUR
.Update
.Requery
End With
If Err.Number <> 0 Then
MsgBox Err.Description, , Err.Number
GoTo Fin:
End If
MaTable.Close
Set MaTable = Nothing
Fin:
End Sub

Une fois que j'ai remplis tout mes champs et que je clique sur le boution un message apparait me disant "un index ou une clé primaire ne peu contenir une valeur nulle". C'est la que je comprend pas puisque dans mon formulaire je n'ai mis aucune valeur nulle.

Si vous avez une idée sur ce que je dois faire pour modifier cela...

ps: j'ai mis l'integrité réferentielle sur mes relations

3 réponses

jerome
 
bonjour, j'ai peut être la solution, il faut enlever la clé primaire. tout simplement.
répondez moi si ce n'est pas la solution.
0
iso
 
ok
0
iso
 
Merci de ton aide, j'ai trouvé la solution j'ai fait une erreur dans le code, je n'ai pas spécifier que cela venait du formulaire, il fallait mettre
![N_SECTEUR] = Forms![Ajout_EMP]!N_SECTEUR
0