Requete select where listbox = all [Résolu]
toufiqihaddou
- Messages postés
- 38
- Date d'inscription
- jeudi 13 janvier 2011
- Dernière intervention
- 23 juillet 2011
- Messages postés
- 38
- Date d'inscription
- jeudi 13 janvier 2011
- Dernière intervention
- 23 juillet 2011
A voir également:
- Requete select where listbox = all
- Erreur 80040e10 requete excel 2010 . Select ...where champ = txt ✓ - Forum - VBA Office (Excel, Word ...)
- Déclaration requete SELECT avec Alias, Rowcount et clause where + textbox ✓ - Forum - C# / .NET
- Requête select des données avec un critère de date-system ✓ - Forum - SQL
- Requète SELECT avec INNER JOIN sur plusieurs tables et des cles manquantes ✓ - Forum - SQL
- Requete select ✓ - Forum - VB.NET
19 réponses
Meilleure réponse
- Messages postés
- 18039
- Date d'inscription
- lundi 7 décembre 2009
- Statut
Attends, là :
si un critère doit répondre à tous les critères (!!!) il suffit de ne pas mentionner ce critère !
____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP
si un critère doit répondre à tous les critères (!!!) il suffit de ne pas mentionner ce critère !
____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
99 internautes nous ont dit merci ce mois-ci
- Messages postés
- 130
- Date d'inscription
- jeudi 16 avril 2009
- Dernière intervention
- 8 décembre 2015
tu peux faire un truc du genre
"select * from table1 where champ1 in (" & listbox.list(0) & "," & listbox.list(1) & ")"
pour une listbox à deux éléments sinon tu continus jusqu'à ton dernier élément.
Est ce que ça répond à ta question ?
nitho l'amateur
"select * from table1 where champ1 in (" & listbox.list(0) & "," & listbox.list(1) & ")"
pour une listbox à deux éléments sinon tu continus jusqu'à ton dernier élément.
Est ce que ça répond à ta question ?
nitho l'amateur
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
99 internautes nous ont dit merci ce mois-ci
- Messages postés
- 18039
- Date d'inscription
- lundi 7 décembre 2009
- Statut
et si ton "All" veut dire tous (mais eux seuls) les critères correspondant à mes items de la listbox (et pas d'autres) ===>> tu as déjà eu une réponse également. J'en ajoute une autre (===>> avec une succession de Or)
____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP
____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
99 internautes nous ont dit merci ce mois-ci
- Messages postés
- 38
- Date d'inscription
- jeudi 13 janvier 2011
- Dernière intervention
- 23 juillet 2011
- Messages postés
- 18039
- Date d'inscription
- lundi 7 décembre 2009
- Statut
Ta requête n'est jamais qu'une chaîne de caractères !
Si donc tu veux y insérer une variable contenant "All" ===>>
tarequete = "Select " & ta_variable & " From ...... etc ..."
____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP
Si donc tu veux y insérer une variable contenant "All" ===>>
tarequete = "Select " & ta_variable & " From ...... etc ..."
____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP
- Messages postés
- 38
- Date d'inscription
- jeudi 13 janvier 2011
- Dernière intervention
- 23 juillet 2011
oui je sais, listbox est dans la condition where pas devant from, et elle contienne des valeurs qui se trouve dans la colonne concerne,
par exemple si je choisie 3 dans la listbox, la requete doit m’afficher tout les lignes qui contiennent 3, alors lorsque l'utilisateur choisie all je dois faire tout simplement un test de if pour lancer deux requêtes, une fois pour le critère 3 et une fois pour all, je cherche s'il y a une autre solution, c tout
par exemple si je choisie 3 dans la listbox, la requete doit m’afficher tout les lignes qui contiennent 3, alors lorsque l'utilisateur choisie all je dois faire tout simplement un test de if pour lancer deux requêtes, une fois pour le critère 3 et une fois pour all, je cherche s'il y a une autre solution, c tout
- Messages postés
- 38
- Date d'inscription
- jeudi 13 janvier 2011
- Dernière intervention
- 23 juillet 2011
- Messages postés
- 38
- Date d'inscription
- jeudi 13 janvier 2011
- Dernière intervention
- 23 juillet 2011
- Messages postés
- 38
- Date d'inscription
- jeudi 13 janvier 2011
- Dernière intervention
- 23 juillet 2011
- Messages postés
- 18039
- Date d'inscription
- lundi 7 décembre 2009
- Statut
Je t'ai alors déjà répondu :
Si "All" sélectionné ===>> pas de critère à spécifier pour ce champ (un critère = une obligation de choix)
Si autre item sélectionné ===>> Where ce_champ = ce_critère/item_sélectionné !
____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP
Si "All" sélectionné ===>> pas de critère à spécifier pour ce champ (un critère = une obligation de choix)
Si autre item sélectionné ===>> Where ce_champ = ce_critère/item_sélectionné !
____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP
- Messages postés
- 38
- Date d'inscription
- jeudi 13 janvier 2011
- Dernière intervention
- 23 juillet 2011
- Messages postés
- 18039
- Date d'inscription
- lundi 7 décembre 2009
- Statut
Je peux utiliser deux requetes, la 1er contient :
select * from table1 where champ1 = listbox.value
et la deusieme requete sans le where pour selectionner tout.
on ne peut pas utiliser une seul requete qui s'atisfait l'utilisateur lorsqu'il fait son chois?
Là, je crains que cela ne devienne totalement incompréhensible !
Donne un exemple simple d'une telle nécessité (je commencerai alors à te comprendre peut-être).
____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP
- Messages postés
- 38
- Date d'inscription
- jeudi 13 janvier 2011
- Dernière intervention
- 23 juillet 2011
- Messages postés
- 38
- Date d'inscription
- jeudi 13 janvier 2011
- Dernière intervention
- 23 juillet 2011
Voila mon exemple :
Call connect Set rs = New ADODB.Recordset rs.CursorLocation = adUseClient rs.Open "select * from Table_principale order by [ID OZ]", cns, adOpenStatic, adLockOptimistic Dim bSQL As String For i = 0 To 29 bSQL = bSQL & "[" & rs.Fields(i).name & "]," Next i bSQL = bSQL & "[" & rs.Fields(30).name & "]" If Combo1.Text "Tout" And Combo2.Text "Tout" Then Set rst = New ADODB.Recordset rst.CursorLocation = adUseClient rst.Open "SELECT " & bSQL & " FROM Table_principale WHERE (((Table_principale.La_date)>=#" & Format(Calendar1.Value, "mm/dd/yyyy hh:nn:ss") & "# AND (Table_principale.La_date)<=#" & Format(Calendar2.Value, "mm/dd/yyyy hh:nn:ss") & "#));", cns, adOpenStatic, adLockOptimistic ElseIf Combo1.Text "Tout" And Combo2.Text "Vide" Then Set rst = New ADODB.Recordset rst.CursorLocation = adUseClient rst.Open "SELECT " & bSQL & " FROM Table_principale WHERE (((Table_principale.La_date)>=#" & Format(Calendar1.Value, "mm/dd/yyyy hh:nn:ss") & "# AND (Table_principale.La_date)<=#" & Format(Calendar2.Value, "mm/dd/yyyy hh:nn:ss") & "#) AND (Table_principale.F19) is NULL);", cns, adOpenStatic, adLockOptimistic ElseIf Combo2.Text = "Vide" Then Set rst = New ADODB.Recordset rst.CursorLocation = adUseClient rst.Open "SELECT " & bSQL & " FROM Table_principale WHERE (((Table_principale.La_date)>=#" & Format(Calendar1.Value, "mm/dd/yyyy hh:nn:ss") & "# AND (Table_principale.La_date)<=#" & Format(Calendar2.Value, "mm/dd/yyyy hh:nn:ss") & "#) AND (Table_principale.F19) is NULL) AND (Table_principale.[CAT PUB])='" & Combo1.Text & "';", cns, adOpenStatic, adLockOptimistic ElseIf Combo1.Text = "Tout" Then Set rst = New ADODB.Recordset rst.CursorLocation = adUseClient rst.Open "SELECT " & bSQL & " FROM Table_principale WHERE (((Table_principale.La_date)>=#" & Format(Calendar1.Value, "mm/dd/yyyy hh:nn:ss") & "# AND (Table_principale.La_date)<=#" & Format(Calendar2.Value, "mm/dd/yyyy hh:nn:ss") & "#) AND (Table_principale.F19)=" & Combo2.Text & ");", cns, adOpenStatic, adLockOptimistic ElseIf Combo2.Text = "Tout" Then Set rst = New ADODB.Recordset rst.CursorLocation = adUseClient rst.Open "SELECT " & bSQL & " FROM Table_principale WHERE (((Table_principale.La_date)>=#" & Format(Calendar1.Value, "mm/dd/yyyy hh:nn:ss") & "# AND (Table_principale.La_date)<=#" & Format(Calendar2.Value, "mm/dd/yyyy hh:nn:ss") & "#) AND (Table_principale.[CAT PUB])='" & Combo1.Text & "');", cns, adOpenStatic, adLockOptimistic Else Set rst = New ADODB.Recordset rst.CursorLocation = adUseClient rst.Open "SELECT " & bSQL & " FROM Table_principale WHERE (((Table_principale.La_date)>=#" & Format(Calendar1.Value, "mm/dd/yyyy hh:nn:ss") & "# AND (Table_principale.La_date)<=#" & Format(Calendar2.Value, "mm/dd/yyyy hh:nn:ss") & "#) AND (Table_principale.[CAT PUB])='" & Combo1.Text & "' AND (Table_principale.F19)=" & Combo2.Text & ");", cns, adOpenStatic, adLockOptimistic End If
- Messages postés
- 18039
- Date d'inscription
- lundi 7 décembre 2009
- Statut
quel est le problème, une autre fois ?
Soit toto la valeur de l'(item sélectionné ===>>
ma_requete = "Select * from ... "'
If toto <> "tout" then
ma_requete ma_requete & "where le_champ " & toto
____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP
Soit toto la valeur de l'(item sélectionné ===>>
ma_requete = "Select * from ... "'
If toto <> "tout" then
ma_requete ma_requete & "where le_champ " & toto
____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP
- Messages postés
- 18039
- Date d'inscription
- lundi 7 décembre 2009
- Statut
Ton problème me parait finalement n'être que celui de la compréhension de la construction, par concaténation conditionnelle, d'une chaîne de caractère (requête SQL ou autre) !
____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP
____________________
Utiliser le bouton "REPONSE ACCEPTEE" sur une réponse exacte facilite les recherches ultérieures d'autres forumeurs. PENSEZ-Y SVP
- Messages postés
- 38
- Date d'inscription
- jeudi 13 janvier 2011
- Dernière intervention
- 23 juillet 2011
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.