Eviter les doublons en enregistrement bdd access

**nboubeur** · 04/09/2008, 10h41

Bonjour ,

Pouvez vous me dire ci il es possible d'eviter les doublons d'enregistrement dans une base access via un formulaire ASP??

Soit en le signalant , soit en l'interdisant ....

Car plusieur personnes utilisent la base et je me retrouve defois avec 3 MR DUPOND ça deviend n'importe quoi

merci d'avance

**vva** · 04/09/2008, 10h45

pour éviter les doublons il te faut créer un numéro d'ID et dans access tu as la possibilité d'avoir un id automatique de sorte à ne pas avoir de doublons

sinon il y a eu un post récemment sur le sujet et il est marqué résolu

**Immobilis** · 04/09/2008, 19h53

Salut,

Un auto incrément n'empeche pas les doublons...

Un doublon doit être définit. Pourquoi n'ay aurait-il pas Mr Dupont Robert, Mr Dupont Charles, Me Dupont Martine, ...

Un doublon est definit sur une information discriminente et peut être composé de plusieurs champs: nom, prénom(s), sexe, date et lieu de naissance, voir parents. Il se pourrait tout à fait que deux Mr Dupont Robert soient nés le même jour dans la même ville. La probabilité qu'il s'agisse de la même personne diminue fortement si on considère les parents et les deuxièmes et 3e prénoms (c'est à ça qu'ils servent).

Dans les SGBD, tu peux définir une contrainte d'unicité sur plusieurs champs.

A+

**nboubeur** · 05/09/2008, 10h27

Voila pour l'enregistrement nous avons pensé à 2 personnes du meme nom forcement , meme pour la recherche ...

mais en faite j'aimerais savoir comment eviter les doublon de fiche en choisissant certains champs , comme le nom , prenom, code postal par exemple car cela servirais deja de filtrer un minimum.

je vous met le code d'enregistrement et de modification de la fiche dans la bdd ( parce que je ne pense pas que ce soi la bdd à paramétrer ? )ci cela peut aider:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
<%@ LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=windows-1252">
<TITLE>resultat de la modification ou de l enregistrement  </TITLE>
 
 
</head>
<body style="text-align: center">
<body background="picsbase/c2.JPG">
<%
salb=Request.form("sab")
 
salb=replace(salb,"<br/>","\vbcrlf")
 
DSN_BASE = "DBQ=" & Request.ServerVariables("APPL_PHYSICAL_PATH") & "bd1.mdb" & ";Driver={Microsoft Access Driver (*.mdb)};Driverld=25"
 
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open DSN_BASE
Set RS = Server.CreateObject("ADODB.Recordset")
 
Select case request.form("Envoie") 
	case "Modifier"
		SQL = "Update Contacts Set datei = '"& Request.form("datei") &"', lieuducontact = '"& Request.form("lieuducontact") &"', nomprenom = '"& Request.form("nomprenom") &"', adresse = '"& Request.form("adresse") &"', codepostal = '"& Request.form("codepostal") &"', ville = '"& Request.form("ville") &"', departement = '"& Request.form("departement") &"', paysregion = '"& Request.form("paysregion") &"', telprof = '"& Request.form("telprof") &"',postetravail = '"& Request.form("postetravail") &"',telmobile = '"& Request.form("telmobile") &"', telecopie = '"& Request.form("telecopie") &"', adresseelectronique = '"& Request.form("adresseelectronique") &"', contactprispar = '"& Request.form("contactprispar") &"', entrepriseconnupar = '"& Request.form("entrepriseconnupar") &"',lequel = '"& Request.form("lequel") &"', proprietairedunmh = '"& Request.form("proprietairedunmh") &"', lieu = '"& Request.form("lieu") &"',taille = '"& Request.form("taille") &"', marque = '"& Request.form("marque") &"', marqueq = '"& Request.form("marqueq") &"', salon = '"& Request.form("salon") &"', saisirlenbredechambre = '"& Request.form("saisirlenbredechambre") &"', budgetmaxi = '"& Request.form("budgetmaxi") &"', remarquemateriel = '"& Request.form("remarquemateriel") &"', lieudinstallation = '"& Request.form("lieudinstallation") &"', datedachatenvisage = '"& Request.form("datedachatenvisage") &"', recontact = '"& Request.form("recontact") &"', datederecontact = '"& Request.form("datederecontact") &"',projetabouti = '"& Request.form("projetabouti") &"', projetannule = '"& Request.form("projetannule") &"', remarquesdivers= '"& Request.form("remarquesdivers") &"',vfa = '"& Request.form("vfa") &"', sd = '"& Request.form("sd") &"', sab = '"& salb &"' where idco = "& Request.form("idco") &""
		RS.Open SQL , Conn
 
Response.write "la fiche de : "& Request.form("nomprenom") &" a bien t modifi dans la base.<br/><a href=""choixcontact.asp"">Revenir</a>"
 
 
   case "Enregistrer"  
     SQL="Insert into Contacts (datei,lieuducontact,nomprenom,adresse,codepostal,ville,departement,paysregion,telprof,postetravail,telmobile,telecopie,adresseelectronique,contactprispar,entrepriseconnupar,lequel,proprietairedunmh,lieu,taille,marque,marqueq,salon,saisirlenbredechambre,budgetmaxi,remarquemateriel,lieudinstallation,datedachatenvisage,recontact,datederecontact,projetabouti,projetannule,remarquesdivers,vfa,sd,sab) Values ('"& Request.form("datei") &"','"& Request.form("lieuducontact") &"','"& Request.form("nomprenom") &"','"& Request.form("adresse") &"','"& Request.form("codepostal") &"','"& Request.form("ville") &"','"& Request.form("departement") &"','"& Request.form("paysregion") &"','"& Request.form("telprof") &"','"& Request.form("postetravail") &"','"& Request.form("telmobile") &"','"& Request.form("telecopie") &"','"& Request.form("adresseelectronique") &"','"& Request.form("contactprispar") &"','"& Request.form("entrepriseconnupar") &"','"& Request.form("lequel") &"','"& Request.form("proprietairedunmh") &"','"& Request.form("lieu") &"','"& Request.form("taille") &"','"& Request.form("marque") &"','"& Request.form("marqueq") &"','"& Request.form("salon") &"','"& Request.form("saisirlenbredechambre") &"','"& Request.form("budgetmaxi") &"','"& Request.form("remarquemateriel") &"','"& Request.form("lieudinstallation") &"','"& Request.form("datedachatenvisage") &"','"& Request.form("recontact") &"','"& Request.form("datederecontact") &"','"& Request.form("projetabouti") &"','"& Request.form("projetannule") &"','"& Request.form("remarquesdivers") &"','"& Request.form("vfa") &"','"& Request.form("sd") &"','"& salb&"')"
	Rs.Open SQL, conn
 
Response.write "La fiche de : "& Request.form("nomprenom") &" a bien t enregistr dans la base.<br/><a href=""choixcontact.asp"">Revenir</a>"
 
 
   case else  
     Response.write "aucune tache choisie" 
end select
 
Set RS = Nothing 
Conn.Close 
Set Conn = Nothing 
%>
</BODY>
</HTML>

merci d'avance

**dedein84** · 05/09/2008, 11h03

personnelement pour resoudre ce genre de probleme, je vérifie si il existe avant l'insertion .D ans un premiere temps tu verifie si il existe pluiseurs personne avec le même nom et prénom, puis tu vérifie l'adresse par exemple.
Si il y a une personne qui a la même adresse et le même nom, tu peux dire que c'est un doublon, donc tu envoie un message en disans que cette personne a déjà été saisie.

**nboubeur** · 08/09/2008, 11h33

Eu oui , possible d'avoir le code svp

Eviter les doublons en enregistrement bdd access

ASP

Vue hybride

Discussions similaires

Partager

Partager