Filtrer selon deux date

Version imprimable

Bonjour,

Je veux filtrer des données stocker selon deux dates: date de dépôt et date de livraison. Vous trouvez ci-dessous le code. Mais on cliquant sur le bouton, il m'affiche tous les données stockés pas selon les dates sélectionner .

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Dim cmd As OleDbCommand = cn.CreateCommand()
        Dim debut As Date = CDate(DateTimePicker1.Text())
        Dim fin As Date = CDate(DateTimePicker2.Text())
        If ComboBox1.SelectedItem = "toutes" Then
            cmd.CommandText = "SELECT numero, total FROM facture WHERE DATEDIFF(date_depot, " & debut & ") >= 0 AND DATEDIFF(date_livraison, " & fin & ") <= 0 "
 
 
        End If
 
        cn.Open()
        Dim reader As OleDbDataReader = cmd.ExecuteReader()
        Dim indice As Integer = 0
 
 
        Do While reader.Read()
            DataGridView1.Rows.Add()
            DataGridView1.Rows(indice).Cells(0).Value = reader.GetInt32(0)
            DataGridView1.Rows(indice).Cells(1).Value = reader.GetDouble(1)
            indice = indice + 1
        Loop
 
        reader.Close()
        cn.Close()

13/12/2013, 14h29
DotNetMatt

Pourquoi utiliser DATEDIFF ?

Quelle est précisément la règle à appliquer ? (ex. Il faut récupérer tous les enregistrements pour lesquels la date de dépot est inférieure ou égale à la date de début....)
13/12/2013, 15h25
foufou.mr

Bon, j'ai plusieurs règle à appliquer.
La première consiste à sélectionner les enregistrements faite supérieur ou égale à la date de dépôt et inférieur ou égale à la date de livraison.
13/12/2013, 15h50
DotNetMatt

Ce n'est toujours pas très clairement expliqué, mais voici déjà une piste :

Code:

cmd.CommandText = "SELECT numero, total FROM facture WHERE date_depot >= @dateDebut AND date_livraison <= @dateFin"

Tu auras besoin de te documenter pour utiliser ce code : Requêtes paramétrées.
13/12/2013, 17h00
foufou.mr
Code:

1 2 Dim debut As Date = CDate(DateTimePicker1.Text()) Dim fin As Date = CDate(DateTimePicker2.Text())
On a une table access facture possédant les attributs numero, total, date_depot et date_livraison. on veut sélectionner le numero et le total de la table facture ou date_depot>=debut et date_livraison<=fin.

J'ai testé ce type de requête

Code:

cmd.CommandText = "SELECT numero, total FROM facture WHERE date_depot >= #" & debut & "# AND date_livraison <= #" & fin & "#"

mais elle affiche tous les enregistrement.

J'ai testé votre proposition mais pas de résultat.
Merci pour votre réponse

Bonjour,

L'utilisation d'une requête paramètrée

Code:

1
2
3
    cmd.CommandText = "SELECT numero, total FROM facture WHERE date_depot >= ? AND date_livraison <= ?"
    cmd.Parameters.AddWithValue("?", debut)
    cmd.Parameters.AddWithValue("?", fin)

14/12/2013, 11h10
crevecoeurj
Citation:
Envoyé par foufou.mr

Code:

1 2 Dim debut As Date = CDate(DateTimePicker1.Text()) Dim fin As Date = CDate(DateTimePicker2.Text())

On a une table access facture possédant les attributs numero, total, date_depot et date_livraison. on veut sélectionner le numero et le total de la table facture ou date_depot>=debut et date_livraison<=fin.

J'ai testé ce type de requête

Code:

cmd.CommandText = "SELECT numero, total FROM facture WHERE date_depot >= #" & debut & "# AND date_livraison <= #" & fin & "#"

mais elle affiche tous les enregistrement.

J'ai testé votre proposition mais pas de résultat.
Merci pour votre réponse
il faut certainement formater les dates en "anglais" en faisant quelque chose du genre:

Code:

cmd.CommandText = "SELECT numero, total FROM facture WHERE date_depot >= #" & debut.tostring("MM/dd/yyyy") & "# AND date_livraison <= #" & fin.tostring("MM/dd/yyyy") & "#"
14/12/2013, 17h01
DotNetMatt

@crevecoeurj, si tu utilises une requête paramétrée, pas besoin de t'occuper du format. Donc il FAUT utiliser des requêtes paramétrées, ça évite bien des soucis en plus de sécuriser ton application contre les attaques par injection SQL entre autre.

1 pièce(s) jointe(s)

Et afin d'être sur que le format sera bien pris en compte, on procède ainsi. (voir le résultat dans la miniature attachées : table access ; sélection date debut = "06/12/2013", date fin = "12/12/2013" ; dgv résultant)
Code:

1 2 3 4 5 cmd.CommandText = "SELECT numero, total FROM facture WHERE date_depot >= ? AND date_livraison <= ?" cmd.Parameters.Add(New OleDbParameter("DateDebut", OleDbType.DBDate)) cmd.Parameters("DateDebut").Value = debut cmd.Parameters.Add(New OleDbParameter("DateFin", OleDbType.DBDate)) cmd.Parameters("DateFin").Value = fin
Access ne tient pas compte des noms dans la requête. D'ou les "?", par contre il est indispensable d'ajouter les paramètres dans l'ordre d'apparition dans la requête.

Un peu de lecture : Tuto sur les requêtes paramétrées (avec sqlServer, mais le principe est le même pour acces, à part les "?" dans la requête à la place des @...)

16/12/2013, 15h38
foufou.mr

Merci