Discussion :

[lola06]

Bonjour, et merci à ceux qui me reprondront

Alors voilà, j'ai un formulaire de recherche multicritère, je n'ai pas de problème pour créer les requètes. J'ai un critère qui est le créneau horaire (donc de 1 à 24) que je choisit avec une liste déroulante.
Le problème se pose au niveau de l'affichage : quand je choisit 2 par exemple il m'affiche les résultats dont le créneau horaire est 2, 12, 20, 21, 22, 23, 24....

J'ai essayé en mettant un 0 devant les chiffres seuls mais Access ne l'accepte pas.

Est ce que quelqu'un sait comment remédier à ce problème ?

Merci

[FRED.G]

Salut,

j'imagine que tu t'es inspirée du tutoriel de caféine. En tout cas, si tu passes par la construction dynamique de ton instruction SQL avec la clause WHERE spécifique à ton filtre, il faut que tu repères la ligne de code qui construit le critère pour le champ stockant la valeur du créneau horaire.
En effet actuellement, tu dois avoir quelque chose du style :

Code :

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

"NomChampCréneauHoraire Like '*" & ValeurCritère & "*'"

C'est à dire que tu traites ton champ comme une chaine de caractère sur laquelle tu fais une recherche partielle grâce au *.
Or il serait plus juste de traiter ton champ comme un champ numérique :

Code :

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

"NomChampCréneauHoraire =" & ValeurCritère

[lola06]

Merci de ta réponse,
en effet je me suis inspirée du tutoriel de cafeine.
Alors j'ai fait le changement que tu m'as dit, mais maintenant aucun enregistrement n'apparait dans la zone de liste de résultats., voilà une partie du code avec ta modification :

Code :

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

1
2
3
 If Me.Créneau And Not Me.Année And Not Me.Mois Then
    Sql = "SELECT NuméroAuto, Année, Mois, Heure, Taux, Transaction FROM CRENEAU_HORAIRE WHERE CRENEAU_HORAIRE!Heure =  & Me.ValeurCréneau "
End If

Si tu as d'autres idées je suis preneuse...

[rainbow14]

je tente ma première réponse (me tapez pas )
dans mon cas je traite la variable comme une chaîne de caractère
ce qui est moins bien que la solution de Fred

Code :

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

1
2
3
 If Me.Créneau And Not Me.Année And Not Me.Mois Then
SQL = "SELECT NuméroAuto, Année, Mois, Heure, Taux, Transaction FROM CRENEAU_HORAIRE WHERE CRENEAU_HORAIRE!Heure Like ' " & Me.ValeurCréneau & " ' "
End IF

j'espère que cela marchera (autrement la honte pour moi)

[FRED.G]

Tu n'as pas bien repris mon exemple, essai comme ceci :

Code :

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

    Sql = "SELECT NuméroAuto, Année, Mois, Heure, Taux, Transaction FROM CRENEAU_HORAIRE WHERE CRENEAU_HORAIRE!Heure ="  & Me.ValeurCréneau

Examine bien la position du dernier guillemet ". Tel que tu l'avais placé, tu n'assignais à la variable Sql qu'une simple chaine de caractère incluant la valeur littérale " & Me.ValeurCréneau" alors que "& Me.ValeurCréneau" est bien entendu du code.

[lola06]

Merci ça marche,
la solution de FRED.G est la bonne :

Code :

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

1
2
3
 If Me.Créneau And Not Me.Année And Not Me.Mois Then
    Sql = "SELECT NuméroAuto, Année, Mois, Heure, Taux, Transaction FROM CRENEAU_HORAIRE WHERE CRENEAU_HORAIRE!Heure = " & Me.ValeurCréneau
End If

Merci de m'avoir aidée...

[lola06]

Désolé mais ça ne marche que s'il y a une seule liste de valeur,
j'ai essayé de faire avec deux mais aucun résultat ne s'affiche..

Code :

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

1
2
3
If Me.Créneau And Not Me.Année And Me.Mois Then
    Sql = "SELECT NuméroAuto, Année, Mois, Heure, Taux, Transaction FROM CRENEAU_HORAIRE WHERE CRENEAU_HORAIRE!Mois = " & Me.ValeurMois & " AND CRENEAU_HORAIRE!Heure = " & Me.ValeurCréneau
End If

Je suis désolée de vous embeter encore, mais comment cela se fait-il que je ne puisse faire qu'avec une seule liste de choix ?