Discussion :

[keunene]

bonjour,
je souhaiterais faire des recherches dans une base access, des données d'une période à une période et l'afficher dans une datagrid.
par exemple faire des recherches de données de janvier 2016 à mars 2017.
c'est un logiciel qui enregistre une personne avec sa date d'inscription.donc faire ressortir ceux qui sont inscrits de telle période à telle période

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
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Try
            Dim dt As New DataTable
            Dim ds As New DataSet
            ds.Tables.Add(dt)
            Dim da As New OleDbDataAdapter
            con.Open()
            da = New OleDbDataAdapter("SELECT dati,nom FROM employe where dati like '%" & TextBox1.Text  & "%' or dati  like '%" & TextBox2.Text & "%'   order by dati ", con)
            da.Fill(dt)
            DataGridView1.DataSource = dt.DefaultView
            con.Close()
        Catch ex As Exception
            MsgBox(ex.Message.ToString)
        End Try
    End Sub

merci pour vos soutiens

[J@ckHerror]

Bonjour,

Et c'est quoi le problème ?
Si c'est le sql regarde du coté de between

Comme remarque on pourra déjà te faire remarquer que les requêtes concat sont à bannir. On leurs préfère les requêtes paramétrés, par soucis de sécurité, mais aussi pour plus de confort notamment pour les conversions. Enfin que des avantages.

Tu sembles obtenir les dates depuis des textBox, il te faudra donc valider la saisie avant, pourquoi ne pas utiliser un DateTimePicker ?

Bon code,
J@ck.

[keunene]

j'ai fait un essai avec cela.il me donne des résultats mais pas des résultats justes.c'est à dire si je des infos 12/2/2010 à 15/05/2014, il me fait aussi apparaître celles de 2016

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
 Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Try
 
 
            Dim datedebut As String = String.Format(TextBox2.Text, "dd/mm/yyyy")
            Dim datefin As String = String.Format(TextBox3.Text, "dd/mm/yyyy")
            Dim dt As New DataTable
            Dim ds As New DataSet
            ds.Tables.Add(dt)
            Dim da As New OleDbDataAdapter
            con.Open()
            da = New OleDbDataAdapter("SELECT dati,nom FROM gloire where dati BETWEEN   " & datedebut & "' and  '" & datefin & "'  order by dati asc ", con)
            da.Fill(dt)
            DataGridView1.DataSource = dt.DefaultView
            con.Close()
        Catch ex As Exception
            MsgBox(ex.Message.ToString)
        End Try
 
 
 
 
    End Sub

merci

[jopopmk]

Salut,

il est fort possible qu'il y ait un souci sur le format des dates.
Comme l'a suggéré J@ck tu devrais passer par des vrais objets DateTime et une requête paramétrée.

[J@ckHerror]

En effet c'est surement parce que ta requête compare des chaines de caractères et non pas des dates.
Du coup pour lui le 12/12/2012 est antérieur au 22/02/2002 car le premier caractère le 1 est inférieur à 2 ....

Va sur des requêtes paramétrées est une fois fait tu te demandera pourquoi tu l'a pas fait avant....

J@ck.

[keunene]

merci infiniment pour vos soutiens.vos contributions m'ont aidé à resoudre le problème