Discussion :

[dynxd]

Bonjour je dispose d'une table avec un id et un code caracterisitique ainsi qu'un nom
le id est forcement unique , j'aimerai que le code le soit aussi , mais sans le definir comme unique dans ma table
puisque l'utilisateur rentre les données uniquement via un formulaire , j'aimerai lui dire de specifier un autre code quand celui existe deja
mais je nesait pas comment verfier qu'un enregistrement avec ce code existe deja

merci

[Demco]

Utilise la fonction DLookup() avec comme critère le code que tu ne veux pas voir répété. Si la fonction te renvoie un enregistrement c'est que ce code existe déjà.

En espérant t'aider.

[dynxd]

salut , en fait jai pas mal bidouillé access pour qu'il nenregistre pas par lui meme les formulaires (enfin avec .Dirty et .Undo ) ,
alors jaimerai avoir une variable = do.cmd.runsql ('select * from etablissement where code = " & moncode & " '; "
et si cette variable est vide ou n'existe pas alors faire lenregistrement sinon mettre un msgbox "code deja utilisé"

sinon je vois dans ta sign que tu es responable de la faq vba , felicitation c'est extremement complet , ca m'aide beaucoup et jsuis en permanence dessus ca m'a beaucoup fait avancé

[Demco]

alors jaimerai avoir une variable = do.cmd.runsql ('select * from etablissement where code = " & moncode & " '; "
et si cette variable est vide ou n'existe pas alors faire lenregistrement sinon mettre un msgbox "code deja utilisé"

Tout à fait,
Seulement le RunSQL ne permet de faire que des requêtes d'action (UPDATE, CREATE, DELETE,...).
Pour une requête de sélection tu dois passer par un Recordset ou par la fonction DLookup() (plus simple à utiliser lorsque tu travaille sur une seule table/requête et que tu n'attends qu'une réponse).

Je te conseille vivement de consulter l'aide Access sur cette fonction, je suis certain qu'elle t'aidera à résoudre ton problème.

Exemple

Code :

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

1
2
MaVar = DLookup("Monchamp", "matable", "moncode = " & varCode)
If len(MaVar)>0 then MsgBox "Ce code existe déjà"

Où varCode est le code saisi par l'utilisateur.

ca m'aide beaucoup et jsuis en permanence dessus ca m'a beaucoup fait avancé

Très heureux de l'apprendre

[dynxd]

ca marche nickel
en plus ca marche aussi avec les tablies liés en mettant plusieurs conditions

merci