Discussion :

[mcharmat]

Bonjour,

J'ai mis le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Form_BeforeUpdate(Cancel As Integer)
If MsgBox("Voulez-vous enregistrer les modifications ?", vbYesNo, "Confirmation") = vbNo Then
Me.Undo
End If
End Sub

Si on clique sur "Non", aucun enregistrement dans la table se fais, seulement avec plusieurs déclinaison, je m'apperçois que le champs clefs [Numéroauto] sont décaler les uns les autres, un clique sur "Non" un numéro perdu, vous avez une formule.

Merci

[Dixies]

Bonjour,

De fait ...
Personnellement, j'ai maintes fois contourné le problème dans l'urgence avec une méthode de "barbare" qui consiste à mettre la propriété du champ N°, non plus en automatique mais en numérique entier long.
Dans le formulaire, la TxtBoxN° est alimentée par :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
'en procédure VBA sur Clic d'un bouton "Valider" par exemple
.....
Dmax("N°","MaTable")+1
.....

Cela dit, je suis preneur de méthodes plus professionnelles ...

Cordialement.

[Robert1957]

Bonjour mcharmat, Dixies,

Dès que ton formulaire est lié, le numéro auto est incrémenté dès qu'il y a une saisie dans un champ du formulaire.

La solution, si la perte de numéro est un problème, est d'avoir un formulaire indépendant et d'insérer les données à l'aide d'une requête ajout. Ainsi tu peux garder un numéro auto comme clé primaire.

Bonne journée

[mcharmat]

Bonsoir,

Dommage, en tous cas ça permet de régler des problème sur toute la base de donnée.

Bonne fin de journnée.

[jimbolion]

mcharmat,

Je me permets d'attirer ta réflexion sur le pourquoi du comment et tu vas comprendre pourquoi !

Il faut se placer dans un environnement multi-utilisateurs. Lorsque tu inities la création d'un enregistrement, la base de données t'attribue un numéro de type auto-increment (que tu trouves bien utile puisque tu en as décidé ainsi afin de t'affranchir d'un certain nombre de contraintes). Tu renseignes un certain nombre d'informations sur ton formulaire (et cela peut prendre de quelques secondes à plusieurs minutes). Durant ce temps, un autre utilisateur a pu initier une demande identique sur un autre poste basée sur la même source de données (il a ainsi obtenu son nouveau numéro). Ce nouveau numéro lui a été attribué et pourtant présent dans son recordset (non encore visible en base) sur lequel il a pu basé un certain nombres de jointures. Quand de son côté il travaille sur son formulaire et n'a pas appliqué soit la fermeture de son ou de ses formulaires, un refreshrecord ou un requery ce numéro d'auto-increment lui reste attribué. Voilà tout simplement pourquoi Access ne libère pas le numéro initié et je dirai heureusement d'ailleurs.

Il ne te reste qu'une méthode que j'approuve est celle évoquée par notre ami Robert et consistant à travailler sur un formulaire indépendant (mais difficilement applicable dans la construction père-fils je le concède). Une autre manière d'écrire tes programmes partant de notre réflexion te permettra de contourner cette problématique.

Dommage, en tous cas ça permet de régler des problème sur toute la base de donnée.

Quels problèmes ? si tes règles d'intégrité sont respectées je n'en vois pas. Le numéro Auto-Increment reste l'apanage des développeurs (le moyen de donner de la robustesse dans nos développements tout en s'affranchissant d'un certain nombre de contraintes). Pour ma part, tous ces numéros sont invisibles sur mes formulaires ou états et l'utilisateur ne connait même pas ce champ. Tu peux l'utiliser pour un bon de commande par exemple je le concède et trouver cela très pratique (dans ce cas la perte d'une valeur ne suit plus la logique utilisateur), personnellement je gère mes champs séparément (merci dmax).

jimbolion

ps. dmax est une fonction, pas l'un de nos chers membres je précise

[Dixies]

Jimbolion,

Même si ta réponse ne m'était pas destinée, merci tout de même : je ne suis que tout petit amateur (mais grand passionné) qui "bricole" à des fins personnelles et je n'avais jamais nuancé l'intérêt du NumAuto comme tu l'as indiqué.
Alors merci pour ce petit cours ....

Cordialement.

[jimbolion]

Dixies,

merci à toi et à tous les passionnés que je salue au passage...

jimmy