Modifications non effectuées : risque de doublon
Voilà mon problème :
J'ai un ss formulaire en mode continu avec une liste déroulante qui me permet de faire un choix.
Sur l'action double clic sur cette liste déroulante j'ouvre un formulaire complémentaire, le choix fait dans la liste déroulante est affiché dans un contrôle du formulaire compléméntaire et constitue également une partie de la clé de la table sous jacente
Je peux saisir des informations dans le formulaire complémentaire et le fermer pour revenir sur le sous formulaire de départ. mais quand je veux quitter le sous formulaire de départ (ou l'actualiser) j'obtiens le message :" Modifications non effectuées : risque de doublons dans un champ index, clé principale ou relation interdisant les doublons Modifiez......."
Le problème est que la saisie se fait bien quand même,l'enregistrement est bien ajouté mais ce message est particulièrement déroutant pour l'utilisateur.
J'ai essayé la pocédure suivante sur l'action sur erreur du sous formulaire :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
| Private Sub Form_Error(DataErr As Integer, Response As Integer)
On Error GoTo Gest_erreur
'
' Ici le traitement
' Gest_erreur pour éviter le message : LES modifications n'ont pas été effectuées qui s'affiche à tort
Gest_erreur:
If Err.Number = 3022 Then
Response = acDataErrContinue
MsgBox "Les doublons sont sautés"
End If
End Sub |
sans succès. Comment faire pour éviter ce message ?
Merci pour votre aide.
