Discussion :

[smix13]

Bonjour;
j'ai un formulaire qui prend ces donées à partir d'une requete SQL sur une table "Test":

Code :

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

1
2
3
4
5
6
7
8
9
Private Sub RefreshQuery()
Dim SQL As Variant
Dim SQLWhere As String
 
SQL = "SELECT [CodeEven], [File], [Intitulé], [Date debut], [Date fin],  [Nombre de clients impactés], [Date MAJ]  FROM Test Where Test!CodeEven <> 0 "
 
If Not Me.chkDate Then
    SQL = "SELECT [CodeEven], [File], [Intitulé], [Date debut], [Date fin],  [Nombre de clients impactés], [Date MAJ]  FROM Test Where Test![Date debut] > & Me.txtRechDate "
End If

ce que j'aimerai faire : une requete qui compare la donnée saisi et la date de la table Test, mais ça ne marche pas .

Besoin d'aide SVP.
Merci

[tAKAmAkA]

Bonjour,

Les discussions sur la recherche multicritère sont nombreuses sur ce forum...
D'autre part le tutoriel de cafeine mérite une lecture attentive. Le principe étant de ne pas réécrire la requête à chaque fois mais de concatener.

Quoiqu'il en soit voici un exemple pour t'inspirer:

Code :

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

1
2
3
If Not Me.chkTraitementDateDebut And Me.datRechTraitementdatedebut <> "" Then
    sql = sql & "AND (Traitementdate >=  #" & Format(Me.datRechTraitementdatedebut, "mm/dd/yyyy") & "# ) "
End If

Enfin:

mais ça ne marche pas

est un peu court comme explication...