Discussion :

[Axe_Débutant]

Bonjour à tous,

J'ai dans une procédure la ligne suivante :

Code :

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

Set oRst = oDb.OpenRecordset("SELECT Count([COM]) FROM [" & valeur_com & "] WHERE [" & valeur_com & "].[LT_]='BIR' and [" & valeur_com & "].[Q1]" & signe3 & bsc_Q1 & " and [" & valeur_com & "].[NAIS]" & signe & birthday, dbOpenSnapshot)

N'étant pas encore bien rodé à l'usage des Recordset, j'aimerais savoir comment on peut mémoriser cette requête SQL dans une variable, en vue de la concaténer à la suite d'une autre requête SQL, éventuellement contenue dans une autre variable.

Je sais le faire lorsqu'il s'agit d'une requête simplement mémorisée dans une variable genre MySQL = "SELECT * FROM..."

Mais ici, avec un Recordset, je ne sais pas comment faire.

Merci pour votre aide.

A bientôt.

[madefemere]

Bonjour,

Peux-tu expliquer le but de ce que tu veux faire.
On concatène du texte (string) et non pas un Recordset, donc le code SQL peut être concaténé mais tu parles de Recordset??

Plus d'explication s'il te plait.

Cordialement,

[Axe_Débutant]

Bonjour,

Tout d'abord, merci de t'intéresser à mon problème.

En fait, j'essaie de développer une petite application afin d'exploiter les résultats d'une enquête dans un formulaire de recherche de type multi critères.

J'ai donc créé un formulaire sur lequel figurent :

- une combo box dans laquelle se trouvent des codes de communes, et dont le choix est mémorisé dans la variable valeur_com dans la ligne que j'ai posté avant,
- deux boutons à bascule selon que la recherche concerne les hommes ou les femmes, et dont le choix est mémorisé dans la variable bsc_Q1, et qui peut prendre les valeurs : 1 pour hommes, 2 pour femmes, rien, ou 3
- une combo box dans la quelle se trouvent l'opérateur "=" et l'instruction SQL " LIKE '*'", et dont la valeur est mémorisée dans la variable signe3
- une combo box dans laquelle se trouvent les choix : nées le, nées avant le, nées après le, et mémorisée dans la variable signe sous la forme des opérateurs =, < et >
- trois combo box correspondant au jour, au mois, et à l'année de naissance, et transformées en DateSerial et mémorisées dans la variable birthday.

Voilà, la combinaison de tous ces champs composent la requête SQL que j'ai postée auparavant. Le problème, c'est qu'elle ne répond qu'aux 2 premières questions de l'enquête alors que j'en ai une trentaine à traiter.

Je pensais donc mémoriser les requêtes SQL au fur et à mesure que l'on sélectionne les critères de recherche dans le formulaire, et les concaténer ensuite pour n'en faire qu'une, une fois que tous les critères ont été choisis.

Ca me permettrait également d'avoir un formulaire réactif : si j'ai comme critères : hommes nés le tant, et que je change de choix pour : hommes nés avant le tant, mon formulaire se met à jour automatiquement.

Voilà, j'espère avoir été explicite, et pas trop soporifique.

Merci encore.

Cordialement.

[pc75]

Bonjour,

Tu peux construire ta requête SQL avant de l'exécuter :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
sql = sql & "select * from Matable "
sql = sql & "where 1 = 1 "
sql = sql & "and commune = '" & ValeurComboCommune & "' "
if ValeurComboSexe = "hommes" then
   sql = sql & "and sexe = '1' "
else
   sql = sql & "and sexe = '2' "
end if
.....
 
Set oRst = oDb.OpenRecordset(sql)

[Axe_Débutant]

Bonjour à vous,

Et merci de vous intéresser à mon cas.

En y réfléchissant bien, il m'est venu l'idée de tout simplement affecter le code SQL à une variable correspondant à chaque question (ex: SQL_Q1, SQL_Q2) que j'insèrerai dans le Recordset de chaque question et que je concatènerai pour obtenir une requête comportant tous les critères de recherche.

Ainsi, pour la question 1, j'aurai le Recorset(SQL_Q1), pour la question 2 : Recordset(SQL_Q1 & SQL_Q2), et ainsi que suite.

Je verrai si ça fonctionne.

En tous cas, merci beaucoup pour votre aide.

Bonne continuation.

Cordialement.