Discussion :

[foufou.mr]

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 :

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

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()

[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....)

[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.

[DotNetMatt]

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

Code VB.NET :

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

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.

[foufou.mr]

Code :

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

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 :

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

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

[rv26t]

Bonjour,

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

Code :

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

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

[crevecoeurj]

Code :

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

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 :

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

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 :

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

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

[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.

[rv26t]

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 :

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

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 @...)

[foufou.mr]

Merci