Problème de requête

Version imprimable

Problème de requête

Bonjour à tous,

J'ai un problème avec la requête suivante. Dans le cadre d'une recherche combinée, je dois trouver les enregistrements qui ont une localisation précise. Sachant que j'ai d'autres critères possibles à prendre en compte, je teste si le critère existe, si d'autres critères ont déjà été traités pour voir si je dois mettre le AND ou pas et si c'est le premier passage pour la même raison. Voilà ma requête :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 premierpassage = 0 if Session("sLocalisation") <> "" then sSQL2 = "select Papyrus.Pack from Papyrus where Num_localisation = '" & Session("sLocalisation") & "' order by Pack" Set rsLocalisation = connect.execute (sSQL2) if not rsLocalisation.EOF then sPackLoc = rsLocalisation ("Pack") if Session("sAuteur") <> "" or Session("sLangue") <> "" or Session("sTitre") <> "Tapez le titre ici" or Session("sGenre") <> "" or Session("sSupport") <> "" or Session("sCartonnage") <> "" or premierpassage <> 0 then sSQL = sSQL + "AND Pack.Pack = '" & sPackLoc & "' " else sSQL = sSQL + "Pack.Pack = '" & sPackLoc & "' " premierpassage = 1 end if rsLocalisation.movenext end if rsLocalisation.close end if
Malheureusment avec ce code, il ne m'afffiche que le premier enregistrement. Pourtant cela fonctionne pour les autres critères même s'ils sont plus simples (pas besoin de la requête sSQL2). Voici le code d'un de ces critères qui fonctionne :
Code:

1 2 3 4 5 6 7 if Session("sProvenance") <> "" then if Session("sAuteur") <> "" or Session("sLangue") <> "" or Session("sTitre") <> "Tapez le titre ici" or Session("sGenre") <> "" or Session("sSupport") <> "" or Session("sCartonnage") <> "" then sSQL = sSQL + "AND Pack.Provenance = '" & Session("sProvenance") & "' " else sSQL = sSQL + "Pack.Provenance = '" & Session("sProvenance") & "' " end if end if
Quelqu'un a-t-il une idée parce que je mouline là :cry:

21/10/2005, 11h55
Pymm

s'il te plait indentes ton code car là c'est limite illisible
as-tu affiché sSQL pour voir ce qu'elle te renvoie ?

Code:

1 2 if not rsLocalisation.EOF then sPackLoc = rsLocalisation ("Pack")
Peut-il te renvoyer pp enregistrements?

Désolé pour le code, le voici en mieux :wink:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 premierpassage = 0 if Session("sLocalisation") <> "" then sSQL2 = "select Papyrus.Pack from Papyrus where Num_localisation = '" & Session("sLocalisation") & "' order by Pack" Set rsLocalisation = connect.execute (sSQL2) while not rsLocalisation.EOF sPackLoc = rsLocalisation ("Pack") if Session("sAuteur") <> "" or Session("sLangue") <> "" or Session("sTitre") <> "Tapez le titre ici" or Session("sGenre") <> "" or Session("sSupport") <> "" or Session("sCartonnage") <> "" or Session("sProvenance") <> "" or premierpassage <> 0 then sSQL = sSQL + "AND Pack.Pack = '" & sPackLoc & "' " else sSQL = sSQL + "Pack.Pack = '" & sPackLoc & "' " premierpassage = 1 end if rsLocalisation.movenext whend rsLocalisation.close end if
J'ai changé, je me suis rendu compte que le if ne faisait pas la boucle (oh le con) je l'ai remplacé par un while mais maintenant il se plante quand j'ai breaucoup d'enregistrement et il ne m'affiche pas de résultats quand j'en ai peu, pourtant le response.write de sSQL m'affiche bien ce qu'il faut, c'est à dire :

Code:

select Pack.Pack, Pack.Pack_Impression from Pack where Pack.Pack = '0348.080' AND Pack.Pack = '2930.000' order by Pack

Le message d'erreur si trop de résultats :

Citation:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
Ce pilote ODBC ne prend pas en charge les propriétés demandées.

21/10/2005, 12h24
dl_jarod

Rectification :

Quand il n'y en a qu'un, il me l'affiche, de 2 à x il m'affiche pas de résultats et de x à infini, il se plante...

Je me suis rendu compte d'une erreur : la première fois qu'il entre dans la boucle, ça doit être and, les fois suivantes, ça doit être OR.

J'ai rectifié ça donne ça pour la boucle :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
while not rsLocalisation.EOF
sPackLoc = rsLocalisation ("Pack")
if Session("sAuteur") <> "" or Session("sLangue") <> "" or Session("sTitre") <> "Tapez le titre ici" or Session("sGenre") <> "" or Session("sSupport") <> "" or Session("sCartonnage") <> "" or Session("sProvenance") <> "" then
	if premierpassage = 0 then
	sSQL = sSQL + "AND Pack.Pack = '" & sPackLoc & "' "
	premierpassage = 1
	else
	sSQL = sSQL + "OR Pack.Pack = '" & sPackLoc & "' "
	end if
else
	if premierpassage = 0 then
	sSQL = sSQL + "Pack.Pack = '" & sPackLoc & "' "
	premierpassage = 1
	else
	sSQL = sSQL + "OR Pack.Pack = '" & sPackLoc & "' "
	end if
end if
rsLocalisation.movenext
wend

Il m'affiche les résultats sauf quand il y en a beaucoup il se plante. Il y a un nombre limite de conditions where dans une requête ?

21/10/2005, 12h52
Pymm

pas que je sache...au max tu peux en avoir combien ?
21/10/2005, 13h51
Immobilis

Que donne le response.write("sSQL") qd tu as "trop" d'enregistrements?

Citation:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
Ce pilote ODBC ne prend pas en charge les propriétés demandées.

Plutôt que

Code:

WHERE Pack.Pack =

tu peux mettre

Code:

WHERE Pack.Pack IN ()

avec chacune des valeurs séparée par une virgule. C'est plus léger.
21/10/2005, 14h17
Pymm

pour info j'ai une chaine de requete qui fait plus de 1000 caractères et ça passe donc y a de la marge...
24/10/2005, 09h06
dl_jarod

Merci beaucoup, ça fonctionne avec

Citation:

Pack.Pack IN ()

Il peut y avoir plus de 2000 résultats ce qui donne des requêtes qui peuvent atteindre des dizaines de milliers de caractères avec ma méthode. Celle d'Immobilis est donc bien meilleure !

Merci encore

Peut-être que pour optimiser tout cela tu devrais déplacer ton IF. En effet, il repose sur des conditions qui ne changent pas dans la boucle. Malgré cela tu l'évalues à chaque tour. Ne pourrais-tu pas faire un truc du style:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
IF Session("sAuteur") <> "" or Session("sLangue") <> "" or Session("sTitre") <> "Tapez le titre ici" or Session("sGenre") <> "" or Session("sSupport") <> "" or Session("sCartonnage") <> "" or Session("sProvenance") <> "" THEN
          WHILE NOT rsLocalisation.EOF
                    if premierpassage = 0 then 
                    sSQL = sSQL + "AND Pack.Pack = '" & sPackLoc & "' " 
                    premierpassage = 1 
                    else 
                    sSQL = sSQL + "OR Pack.Pack = '" & sPackLoc & "' " 
                    end if
                    rslocalisation.movenext
          WEND
ELSE
          WHILE NOT rsLocalisation.EOF
                    if premierpassage = 0 then 
                    sSQL = sSQL + "Pack.Pack = '" & sPackLoc & "' " 
                    premierpassage = 1 
                    else 
                    sSQL = sSQL + "OR Pack.Pack = '" & sPackLoc & "' " 
                    end if 
                    rslocalisation.movenext
          WEND
END IF

Encore mieux, si tu fais un

Code:

1
2
3
4
rs.open "SELECT Pack.Pack FROM Pack WHERE TA CONDITION GROUP BY Pack.Pack", strprovider,1,1
maliste = rs.getrow("pack")
rs.close
sSQL = "SELECT (...) IN (" & maliste &")"

Cela te renvoie directement le tableau des valeurs que tu recherches.

A+