Erreur execution access 2000

popysan · 09/10/2008, 12h18

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 :

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 · 09/10/2008, 13h42

Bonjour,

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

Philippe JOCHMANS · 09/10/2008, 13h49

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 · 09/10/2008, 14h23

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 :

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

Code :

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 :

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

Merci

popysan · 09/10/2008, 16h33

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

Code :

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

L'erreur est toujours la même.

Philippe JOCHMANS · 09/10/2008, 16h59

Bonjour

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

Philippe

mout1234 · 09/10/2008, 18h37

Citation:

Envoyé par Philippe JOCHMANS

Bonjour

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

Philippe

voir par ici pour plus de détail

09/10/2008, 12h18	#1 (permalink)
popysan Invité de passage Date d'inscription: février 2003 Messages: 5	Erreur execution access 2000 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 : 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 Dernière modification par popysan ; 09/10/2008 à 14h12

09/10/2008, 13h42	#2 (permalink)
mout1234 Modérateur Date d'inscription: novembre 2006 Localisation: Paris Âge: 39 Messages: 1 711	Bonjour, Merci de préciser, dans le titre, la version d'Access utilisée. __________________ ............................................................................................ Dans l'intérêt de tous, ne posez pas de questions techniques par messages privés. Les FAQs les tutos Les Sources Access Profitez de ces mines d'or... Postez dans le bon sous forum et mentionnez la version

09/10/2008, 13h49	#3 (permalink)
Philippe JOCHMANS Responsable PowerPoint Date d'inscription: mai 2005 Localisation: Loir et Cher et Touraine Âge: 40 Messages: 10 017	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 __________________ En cas de questions techniques par MP ou message visiteur Office : :Les Cours, Les FAQs VB : Les Cours, Les FAQs Mes articles : ici Me connaitre

09/10/2008, 14h23	#4 (permalink)
popysan Invité de passage Date d'inscription: février 2003 Messages: 5	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 : nas = IIf(DCount("[chpnas]", "tblagent", "[Nom]=lstagent and [chpnas]='OUI'") = 1, 1, 0) Code : 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 : tempcur = DCount("[Nom]", "tbljour", "[chpdate]=txtdate1.caption") Merci

09/10/2008, 16h33	#5 (permalink)
popysan Invité de passage Date d'inscription: février 2003 Messages: 5	J'ai peut être mal compris... voici les modifications effectuées sur le code Code : tempcur = DCount("[Nom]", "[tbljour]", "[chpdate]='" & [datecur] & "' and [Nom]='" & [lstagent] & "'") L'erreur est toujours la même.

09/10/2008, 16h59	#6 (permalink)
Philippe JOCHMANS Responsable PowerPoint Date d'inscription: mai 2005 Localisation: Loir et Cher et Touraine Âge: 40 Messages: 10 017	Bonjour Si chpdate est un champ de type date, il faut mettre des # à la place des '. Philippe __________________ En cas de questions techniques par MP ou message visiteur Office : :Les Cours, Les FAQs VB : Les Cours, Les FAQs Mes articles : ici Me connaitre

		Forum des développeurs > Hardware, Systèmes et Logiciels > Microsoft Office > Access > VBA Access
Erreur execution access 2000

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email