Formulaire Ajout access
iso
-
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
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
A voir également:
- Formulaire Ajout access
- Whatsapp formulaire opposition - Guide
- Formulaire de réclamation facebook compte désactivé - Guide
- Formulaire de reclamation instagram - Guide
- Ajout rapide snap - Forum Snapchat
- Ajout snap sans rien d'écrit - Forum Snapchat