Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 18/08/2011, 04h21   #1
Membre actif
 
Avatar de robyseb
 
Homme Sébastien
Développeur indépendant
Inscription : juillet 2011
Messages : 178
Détails du profil
Informations personnelles :
Nom : Homme Sébastien
Localisation : Canada

Informations professionnelles :
Activité : Développeur indépendant

Informations forums :
Inscription : juillet 2011
Messages : 178
Points : 193
Points : 193
Par défaut Problème sur Dcount avec une clause where

Bonjour tous le monde ... petit problème j'essai d'effectuer un Dcount voici le code :
Code :
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
robyseb est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 18/08/2011, 07h01   #2
Rédacteur/Modérateur

 
Avatar de loufab
 
Homme Fabrice CONSTANS
Ingénieur développement logiciels
Inscription : avril 2005
Messages : 7 086
Détails du profil
Informations personnelles :
Nom : Homme Fabrice CONSTANS
Localisation : France, Haute Garonne (Midi Pyrénées)

Informations professionnelles :
Activité : Ingénieur développement logiciels

Informations forums :
Inscription : avril 2005
Messages : 7 086
Points : 11 622
Points : 11 622
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 :
DCount("ID_intervention", "tbl_intervention", "[date_intervention]= Format(date, 'yyyy-mm-dd')")
Cordialement,
__________________
Classe MELA(CRUD) Opérateur IN et zone de liste
MsGraph et VBA - 1e Partie 2e partie
Entête d'états-Opérateur LIKE-Evénements formulaires-Cours 2010
Complément :Générateur de msgbox
Visitez mon Blog
Les questions techniques par MP ne sont pas lues et je ne pratique pas l'extispicine
loufab est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 18/08/2011, 16h04   #3
Membre actif
 
Avatar de robyseb
 
Homme Sébastien
Développeur indépendant
Inscription : juillet 2011
Messages : 178
Détails du profil
Informations personnelles :
Nom : Homme Sébastien
Localisation : Canada

Informations professionnelles :
Activité : Développeur indépendant

Informations forums :
Inscription : juillet 2011
Messages : 178
Points : 193
Points : 193
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 :
Citation:
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 :
"[date_intervention]= Format(date, 'yyyy-mm-dd')")
cordialement
robyseb est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 18/08/2011, 20h04   #4
Rédacteur
 
Avatar de LedZeppII
 
Homme
Maintenance données produits
Inscription : décembre 2005
Messages : 3 939
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France, Yvelines (Île de France)

Informations professionnelles :
Activité : Maintenance données produits
Secteur : Distribution

Informations forums :
Inscription : décembre 2005
Messages : 3 939
Points : 6 278
Points : 6 278
Par défaut Re:erreur 2471

Bonsoir,

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

A+
LedZeppII est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 18/08/2011, 21h10   #5
Membre actif
 
Avatar de robyseb
 
Homme Sébastien
Développeur indépendant
Inscription : juillet 2011
Messages : 178
Détails du profil
Informations personnelles :
Nom : Homme Sébastien
Localisation : Canada

Informations professionnelles :
Activité : Développeur indépendant

Informations forums :
Inscription : juillet 2011
Messages : 178
Points : 193
Points : 193
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 :
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 :
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} !!!!!
robyseb est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 18/08/2011, 21h37   #6
Rédacteur/Modérateur

 
Avatar de loufab
 
Homme Fabrice CONSTANS
Ingénieur développement logiciels
Inscription : avril 2005
Messages : 7 086
Détails du profil
Informations personnelles :
Nom : Homme Fabrice CONSTANS
Localisation : France, Haute Garonne (Midi Pyrénées)

Informations professionnelles :
Activité : Ingénieur développement logiciels

Informations forums :
Inscription : avril 2005
Messages : 7 086
Points : 11 622
Points : 11 622
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().
__________________
Classe MELA(CRUD) Opérateur IN et zone de liste
MsGraph et VBA - 1e Partie 2e partie
Entête d'états-Opérateur LIKE-Evénements formulaires-Cours 2010
Complément :Générateur de msgbox
Visitez mon Blog
Les questions techniques par MP ne sont pas lues et je ne pratique pas l'extispicine
loufab est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 18/08/2011, 22h07   #7
Membre actif
 
Avatar de robyseb
 
Homme Sébastien
Développeur indépendant
Inscription : juillet 2011
Messages : 178
Détails du profil
Informations personnelles :
Nom : Homme Sébastien
Localisation : Canada

Informations professionnelles :
Activité : Développeur indépendant

Informations forums :
Inscription : juillet 2011
Messages : 178
Points : 193
Points : 193
ayoye ....... je suis sans mot .... la formule fonctionne

Code :
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 ....
robyseb est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 18/08/2011, 22h14   #8
Rédacteur/Modérateur

 
Avatar de loufab
 
Homme Fabrice CONSTANS
Ingénieur développement logiciels
Inscription : avril 2005
Messages : 7 086
Détails du profil
Informations personnelles :
Nom : Homme Fabrice CONSTANS
Localisation : France, Haute Garonne (Midi Pyrénées)

Informations professionnelles :
Activité : Ingénieur développement logiciels

Informations forums :
Inscription : avril 2005
Messages : 7 086
Points : 11 622
Points : 11 622
Tu es sur que quelque part il n'y a pas un de tes objets qui se nomme Date ?
variable, champs ,controle ...
__________________
Classe MELA(CRUD) Opérateur IN et zone de liste
MsGraph et VBA - 1e Partie 2e partie
Entête d'états-Opérateur LIKE-Evénements formulaires-Cours 2010
Complément :Générateur de msgbox
Visitez mon Blog
Les questions techniques par MP ne sont pas lues et je ne pratique pas l'extispicine
loufab est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 18/08/2011, 22h21   #9
Membre actif
 
Avatar de robyseb
 
Homme Sébastien
Développeur indépendant
Inscription : juillet 2011
Messages : 178
Détails du profil
Informations personnelles :
Nom : Homme Sébastien
Localisation : Canada

Informations professionnelles :
Activité : Développeur indépendant

Informations forums :
Inscription : juillet 2011
Messages : 178
Points : 193
Points : 193
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 ...
robyseb est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 18/08/2011, 22h39   #10
Rédacteur/Modérateur

 
Avatar de loufab
 
Homme Fabrice CONSTANS
Ingénieur développement logiciels
Inscription : avril 2005
Messages : 7 086
Détails du profil
Informations personnelles :
Nom : Homme Fabrice CONSTANS
Localisation : France, Haute Garonne (Midi Pyrénées)

Informations professionnelles :
Activité : Ingénieur développement logiciels

Informations forums :
Inscription : avril 2005
Messages : 7 086
Points : 11 622
Points : 11 622
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 !
__________________
Classe MELA(CRUD) Opérateur IN et zone de liste
MsGraph et VBA - 1e Partie 2e partie
Entête d'états-Opérateur LIKE-Evénements formulaires-Cours 2010
Complément :Générateur de msgbox
Visitez mon Blog
Les questions techniques par MP ne sont pas lues et je ne pratique pas l'extispicine
loufab est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 16h04.


 
 
 
 
Partenaires

Hébergement Web