Discussion :

[robyseb]

Bonjour tous le monde ... petit problème j'essai d'effectuer un Dcount voici le code :

Code :

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

Me.compteintervention.Value = DCount("ID_intervention", "tbl_intervention", "[date_intervention]" = Format(date, "yyyy-mm-dd"))

il se trouve qu'il a fonctionné une seule fois je ne sait pas pourquoi ?? La date qui est dans ma table est écrit de cette manière 2011-08-17

auriez vous une idée merci

[loufab]

Bonjour,
Une seule fois, c'est bien étrange.

Par contre tu n'est pas obligé de composer dynamiquement ta ligne donc tu peux te passer des spérateurs. Ecris simplement :

Code :

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

DCount("ID_intervention", "tbl_intervention", "[date_intervention]= Format(date, 'yyyy-mm-dd')")

Cordialement,

[robyseb]

bonjour loufab

avec le code que tu ma donné j'avait essayer ..mais pour être certain je l'ai re-essayer et là ca me sort une erreur 2471 sur la date !!

pour te mettre dans le contexte j'ai écrit ce code sous l'évènement timer du form puisque je désire qu'il soit updaté constamment.

je t'avoue que je ne comprend pas pourquoi ca bug

tu dit :

tu peux te passer des spérateurs.

est-ce seulement les " dont tu parlais ! j'ai enlever la clause where et ca fonctionne à merveille mais j'ai besoin de cette clause !

Code :

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

"[date_intervention]= Format(date, 'yyyy-mm-dd')")

cordialement

[LedZeppII]

Bonsoir,

Essaie en ajoutant des parenthèses à Date Date()

A+

[robyseb]

Bonjour ledzeppII l'auto éditeur les retires automatiquement !!

la chose bizarre est que j'ai 2 fenêtres ou le code s’exécute la première il n'y a rien d'autre sous le form timer et ca fonctionne voir le code :

Code :

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

1
2
3
4
5
Private Sub Form_Timer()
 
Me.compteintervention.Value = DCount("ID_intervention", "tbl_intervention", "date_intervention = Format(date, 'dd-mmm-yyyy')")
Me.comptelogistic.Value = DCount("ID_logistic", "tbl_logistic", "date_logistic = Format(date, 'dd-mmm-yyyy')")
End Sub

la 2e qui me cause problème ;

Code :

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

1
2
3
4
5
6
Private Sub Form_Timer()
[heure] = Format(Now(), "long time")
 
Me.compteintervention.Value = DCount("ID_intervention", "tbl_intervention", "date_intervention = Format(date, 'dd-mmm-yyyy')")
Me.comptelogistic.value = DCount("ID_logistic", "tbl_logistic", "date_logistic = Format(date, 'dd-mmm-yyyy')")
End Sub

et là sérieusement je n'y comprend rien de rien ... je fait copier coller du code qui fonctionne dans un formulaire et dans le 2e j'ai l'erreur 2471 l'expression entrée comme paramètre de requête est à l'origine de l'erreur suivante : {date} !!!!!

[loufab]

Tu n'aurais pas nommé un controle avec le mot réservé Date ?

Sinon met Now à la place de date, c'est pareil vu que tu utilises un format().

[robyseb]

ayoye ....... je suis sans mot .... la formule fonctionne

Code :

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

1
2
Me.compteintervention.Value = DCount("ID_intervention", "tbl_intervention", "date_intervention = Format(now, 'dd-mmm-yyyy')")
Me.comptelogistic.Value = DCount("ID_logistic", "tbl_logistic", "date_logistic = Format(now, 'dd-mmm-yyyy')")

merci loufab .... mais de ou pourrait bien venir une telle erreur j'ai vérifier et je n'ai aucun champ nommé date ....

[loufab]

Tu es sur que quelque part il n'y a pas un de tes objets qui se nomme Date ?
variable, champs ,controle ...

[robyseb]

J'ai trouvé à un endroit j'avait un bouton qui fessait un docmd.openform avec une variable [date]= date() j'ai corrigée et tous est ok maintenant ouff pas évident de trouver la source heinn

Merci encore pour tous ...

[loufab]

S'il y a bien quelques choses qui est valable dans tout les langages c'est les mots réservés. Donc tu mérites bien une petite floppé de smiles expressifs !



ceci n'est que pure plaisanterie !