[AC-2003] Exclus enregistrement en cours dans comptage [Résolu]

[willytito]

Bonjour,
Je développe avec Access 2003 sous Windows XP Pro.
Mon but est de vérifier si une personne existe déjà dans la base de donnée avant de valider.
Le critère ne se base pas sur l'orthographe exact mais sur une ressemblance.

Pour se faire, j'ai utilisé la fonction Dcount.
ça fonctionne plus ou moins, le problème réside dans la modification d'une personne.
Lors de l'enregistrement des modifications, la fonction dcount renvois 1, car elle comptabilise l'enregistrement en cours.
Y a-t-il un moyen d'exclure l'enregistrement en cours de Dcount ?
Ou peut-on procéder différemment pour contourner ce problème ?

Si vous avez une idée, je suis preneur.
Merci
Willy

[marot_r]

DCount()-1

Autre solution changer ton critère pour exclure l'égalité exacte ex :

Code :

"[TonNom] like ""*" & TonNomCherche & "*"" and not ([TonNom] = """ &  TonNomCherche & """)"

Enfin tu peux simplement réagir si DCount()>1. Personnelement je choisirai celle-ci qui a le moins d'impact sur ma logique de traitement.

A+

[willytito]

Salut,
L'idée de Dcount() - 1 ou Dcounr() > 1 n'est pas mal.
Mais dans mon cas ça ne fonctionnera qu'à moitié:
ça fonctionnera uniquement pour la modification.
Dans un ajout, il va me zapper le 1er enregistrement commun.

Plus de précision sur mon problème :
Une table "T_Personne" avec les champs ("Idt_Personne", "Nom_Personne", "Prenom_Personne")
Cette table est liée à un formulaire avec des zones de texte "Txt_Nom" et "Txt_Prenom" et un bouton "Btn_enregistrer".

La recherche de doublon s'effectue uniquement sur le champs "Txt_Nom"
C'est une recherche large avec "like" et le caractère "*" de chaque côté.

Je voudrais contrôler les noms similaires après un ajout ou une modification.
Pour éviter l'apparition de doublon après chaque modification, il me faut exclure l'enregistrement en cours.

En espérant que c'est plus clair, ce n'est pas évident à expliquer.
Willy

[marot_r]

Si tu as une clef pour ton energistrement tu peux l'exclure de ta recherche comme ceci :

Code :

"[TonNom] like ""*" & TonNomCherche & "*"" and [TaClefEnr] <> " & me.TaclefEnr

A+

[willytito]

Je vais tester
ça devrait fonctionner !
Merci pour cette idée
A plus
Willy

[willytito]

Encore merci.
C'est exactement ce que je voulais !
Willy