Requete SQL possedant un "or" sous VBA
darkman972
Messages postés
90
Date d'inscription
Statut
Membre
Dernière intervention
-
darkman972 Messages postés 90 Date d'inscription Statut Membre Dernière intervention -
darkman972 Messages postés 90 Date d'inscription Statut Membre Dernière intervention -
Bonjour a tous
j'ai la requete suivante qui passe sous access mais pas sous VBA c'est normal?? Si oui comment puis-je faire cette requete sous VBA???
SELECT Count(*) AS ssreseaunbofctr,
Sum([tblContractsYTD2].[ANIrenta]) AS ssreseauSumOfANI,
FROM tblContractsYTD2
WHERE (([tblContractsYTD2].[period_id]) >=1 And ([tblContractsYTD2].[period_id]) <=18
And [tblContractsYTD2].[CDSSRESEAU] ="API" OR [tblContractsYTD2].[CDSSRESEAU] ="APD")
Merci
j'ai la requete suivante qui passe sous access mais pas sous VBA c'est normal?? Si oui comment puis-je faire cette requete sous VBA???
SELECT Count(*) AS ssreseaunbofctr,
Sum([tblContractsYTD2].[ANIrenta]) AS ssreseauSumOfANI,
FROM tblContractsYTD2
WHERE (([tblContractsYTD2].[period_id]) >=1 And ([tblContractsYTD2].[period_id]) <=18
And [tblContractsYTD2].[CDSSRESEAU] ="API" OR [tblContractsYTD2].[CDSSRESEAU] ="APD")
Merci
A voir également:
- Requete SQL possedant un "or" sous VBA
- Or - Guide
- Incompatibilité de type vba ✓ - Forum Programmation
- X64 or x86 ✓ - Forum Windows
- Logiciel sql - Télécharger - Bases de données
- Vba attendre 1 seconde ✓ - Forum VB / VBA
3 réponses
je comprends pas la question. Du SQL c'est du SQL (enfin en l'occurrence de l'access SQL), sous VBA ça reste du SQL
c'est ton code VBA qu'il faut montrer
déjà tu peux toujours la nettoyer un peu
SELECT Count(*) AS ssreseaunbofctr,
Sum(ANIrenta) AS ssreseauSumOfANI,
FROM tblContractsYTD2
pour la dernière ligne, ça dépend de ce que tu veux exactement:
WHERE (period_id >=1 AND period_id <=18 AND CDSSRESEAU ="API") OR CDSSRESEAU ="APD"
ou (a priori)
WHERE period_id >=1 AND period_id <=18 AND (CDSSRESEAU ="API" OR CDSSRESEAU ="APD")
évidemment en vba, fais gaffe aux double-quotes
kinder.surprise,
le maton du matou
c'est ton code VBA qu'il faut montrer
déjà tu peux toujours la nettoyer un peu
SELECT Count(*) AS ssreseaunbofctr,
Sum(ANIrenta) AS ssreseauSumOfANI,
FROM tblContractsYTD2
pour la dernière ligne, ça dépend de ce que tu veux exactement:
WHERE (period_id >=1 AND period_id <=18 AND CDSSRESEAU ="API") OR CDSSRESEAU ="APD"
ou (a priori)
WHERE period_id >=1 AND period_id <=18 AND (CDSSRESEAU ="API" OR CDSSRESEAU ="APD")
évidemment en vba, fais gaffe aux double-quotes
kinder.surprise,
le maton du matou
Bonjour,
L'équivalent de la partie where de cette requete en vba c'est ca:
"WHERE (period_id] >= " & period_id1 & " And [period_id] <= " & period_id2 & " " & _
"And ([CDSSRESEAU] ='" & API & "' OR [CDSSRESEAU] ='" & APD & "'))"
Mais je suis désolé cette requete ne passe pas sous VBA.
Je suis d'accord avec toi qu'une requeste SQl reste une requete SQL meme sous VBA mais je sais pas pourquoi elle pas pas. Si tu peux m'aider.
Ce que je veux faire c'est transcrire exactement la requete du haut de mon message en VBA.
Merci
L'équivalent de la partie where de cette requete en vba c'est ca:
"WHERE (period_id] >= " & period_id1 & " And [period_id] <= " & period_id2 & " " & _
"And ([CDSSRESEAU] ='" & API & "' OR [CDSSRESEAU] ='" & APD & "'))"
Mais je suis désolé cette requete ne passe pas sous VBA.
Je suis d'accord avec toi qu'une requeste SQl reste une requete SQL meme sous VBA mais je sais pas pourquoi elle pas pas. Si tu peux m'aider.
Ce que je veux faire c'est transcrire exactement la requete du haut de mon message en VBA.
Merci
c bon j'ai trouvé la solution. c'est dans les cotes que j'ai utilisé. a la place des ' il faut utilisé des "
"WHERE (([tblContractsYTD2].[period_id]) >=" & period_id1 & " And ([tblContractsYTD2].[period_id]) <=" & period_id2 & " And ([tblContractsYTD2].[CDSSRESEAU] =""API"" OR [tblContractsYTD2].[CDSSRESEAU] =""APD""))"
"WHERE (([tblContractsYTD2].[period_id]) >=" & period_id1 & " And ([tblContractsYTD2].[period_id]) <=" & period_id2 & " And ([tblContractsYTD2].[CDSSRESEAU] =""API"" OR [tblContractsYTD2].[CDSSRESEAU] =""APD""))"