Discussion :

[facteur]

Bonjour,

J'ai crée un formulaire où est inseré une listebox.
Cette listebox contient une grande requête en sql.

Lorsque je lance cette requete sql , j'ai un message d'erreur qui s'affiche
Cette erreur concerne une fonction de domaine
et j'ai 4 fonctions de domaine

"Erreur d'execution 3122
Vous avez essayé d'éxecuter une requete ne comprenant pas l'expression spécifié
FormatPercent(DCount([Nbcolis_ilot2],[T_DemiRecirculation_Ilot2],[CodeReaderResult]=0 and [N° Porte principale]=50)/(DCount([Nbcolis_ilot2],[T_DemiRecirculation_Ilot2], [N° Porte principale]=50))) AS DR_Video

je penses que c'est une question de guillemets car lorsque j'applique cette fonction de domaine en mode création , je mets des guillemets
et cela fonctionne:

Code :

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

FormatPercent(DCount("[Nbcolis_ilot2]","[T_DemiRecirculation_Ilot2]","[CodeReaderResult]=0 and [N° Porte principale]=50")/(DCount("[Nbcolis_ilot2]","[T_DemiRecirculation_Ilot2]"," [N° Porte principale]=50"))) AS DR_Video

mais en vba, je dois supprimer les guillemets sinon mon code sql est invalide


Pour une meilleur compréhension, voici ci dessous
la fonction de domaine telle que je l'aie ecrit en sql.
je me suis arrêté à la première fonction de domaine pour une meilleur visibilité du code.

merci d'avance

Code :

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

1
2
3
4
5
6
7
8
9
strSQLSELECT = "SELECT T_DemiRecirculation_Ilot2.Ilot, Count(T_DemiRecirculation_Ilot2.Nbcolis_ilot2) AS nbre_Colis_DR_ilot2, T_DemiRecirculation_Ilot2.brin,"
 
strSQLSELECT = strSQLSELECT + "T_DemiRecirculation_Ilot2.Allée, T_DemiRecirculation_Ilot2.chute, T_DemiRecirculation_Ilot2.[N° Porte principale] AS N°_Porte,"
 
strSQLSELECT = strSQLSELECT + "T_DemiRecirculation_Ilot2.DESTINATION, FormatPercent(DCount([Nbcolis_ilot2],[T_DemiRecirculation_Ilot2],"
 
strSQLSELECT = strSQLSELECT + "[CodeReaderResult]=0 and [N° Porte principale]=" & Vporte & ")/(DCount([Nbcolis_ilot2],[T_DemiRecirculation_Ilot2],"
 
strSQLSELECT = strSQLSELECT + " [N° Porte principale]=" & Vporte & "))) AS DR_Video,....

[marot_r]

Bonjour.

Il manque les délimiteurs de chaîne.

Ton DCount() devrait être dans ton VBA quelque chose comme

Code :

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

DCount(""TonChamp"", ""TaSource"", ""TonCritere"")

Note qu'il faut doubler les guillemets (") quand ont les utilises dans une chaîne de caractère.

A+

[facteur]

Bonjour marto
et dans ma fonction de domaine , j'ai plusieurs critère dois je ecrire,

Code :

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

DCount(""TonChamp"", ""TaSource"", ""TonCritere"" and ""Toncritère2"")

ou

Code :

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

DCount(""TonChamp"", ""TaSource"", ""TonCritere and Ton Critere2"")

[marot_r]

Code :

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

DCount(""TonChamp"", ""TaSource"", ""TonCritere and Ton Critere2"")

A+

[facteur]

Bonsoir Marot;
c'est ce que je pensais
Merci de ton aide
Je ferme cette discussion