Discussion :

[popysan]

Bonjour,
Sans modification particulière une application access/vba me donne aujourd'hui l'erreur d'exécution suivante : '3159' signet non valide.
Voici la ligne qui apparemment pose problème :

Code :

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

tempcur = DCount("[Nom]", "tbljour", "[chpdate] = txtdate1.caption AND [nom] =nomagent" )

j'ai testé la valeur de "txtdate1.caption" et de "nomagent" c'est ok

Pourriez-vous m'aider, merci d'avance

[mout1234]

Bonjour,


Merci de préciser, dans le titre, la version d'Access utilisée.

[Invité]

Bonjour

Il faut que tu sortes les noms de tes champs de la chaine, un peu de lecture général : http://starec.developpez.com/tuto/fonctionsdomaines/ surtout cette partie : IV. REMARQUES

Philippe

[popysan]

Je vais regarder mais je ne comprends pas pourquoi ça fonctionnait avant et plus maintenant. De plus la ligne du dessus ne pose pas de problèmes :

Code :

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

nas = IIf(DCount("[chpnas]", "tblagent", "[Nom]=lstagent and [chpnas]='OUI'") = 1, 1, 0)

Code :

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

tempcur = DCount("[Nom]", "tbljour", "[chpdate]=txtdate1.caption and [Nom]=lstagent")

Après avoir isolé chaque partie de la requête c'est la fin qui pose problème
Ceci fonctionne :

Code :

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

tempcur = DCount("[Nom]", "tbljour", "[chpdate]=txtdate1.caption")

Merci

[popysan]

J'ai peut être mal compris... voici les modifications effectuées sur le code

Code :

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

tempcur = DCount("[Nom]", "[tbljour]", "[chpdate]='" & [datecur] & "' and [Nom]='" & [lstagent] & "'")

L'erreur est toujours la même.

[Invité]

Bonjour

Si chpdate est un champ de type date, il faut mettre des # à la place des '.

Philippe