Problème select selon une date datagridview

je possède un textbox1 où l'utilisateur peut entrer une date
une table acces nomé "test " où "date_du_jour" est un champ de type date
je souhaite qu'en cliquant sur un bouton ,afficher les données de la table test dans un datagridview où date_du_jour= la date que l'utilisateur a entré

j'ai mis ce bout de code mais il m'affiche rien dans la datagridview,je suis bloqué SVP j'ai besoin de votre aide !

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim jour As Date jour = Date.Parse(TextBox1.Text).ToString("MM/dd/yyyy") If Not cnn.State = ConnectionState.Open Then 'open connection cnn.Open() End If Dim cmd As New OleDb.OleDbCommand("SELECT * FROM test where date_du_jour=" & jour)   cmd.Connection = cnn   Dim da As New OleDb.OleDbDataAdapter da.SelectCommand = cmd Dim ds As New DataSet da.Fill(ds) dgvData.DataSource = ds   cmd.ExecuteNonQuery() cnn.Close()   End Sub

---

Salut,

Il existe des contrôles pour saisir une date comme le datetimepicker....
Avec un simple textbox :

Code:

---

jour = Convert.ToDateTime(Textbox1.Text)

---

Ensuite je ne sais pas comment tu as construis ton textbox. On peut vérifier avant de convertir si ce qui est saisi dans le textbox est un format de date (j'avais eu des soucis pour des saisies tel que 37/14/2013 .... ), Soit ainsi

Code:

---

If IsDate(Textbox1.Text) Then jour = Convert.ToDateTime(Textbox1.Text)

---

Soit directement dans le TextChanged de ta Textbox .... et d'afficher un message lorsque le format de la date est incoorect

Concernant la commande Select, il me semble qu'il faille l'écrire ainsi :

Code:

---

("SELECT * FROM test where date_du_jour= '" & jour & "'")

---

merci pour me répondre
mais j'ai suivi ce que vous me dite mais il a mis une erreur ici à la fin de l'instruction

Code:

---

("SELECT * FROM test where date_du_jour= '" & jour & "'")

---

mais en gardant ceci

Code:

---

("SELECT * FROM test where date_du_jour=" & jour)

---

et avec les autres modifications ça change rien, il ne m'affiche rien dans la daragridview :roll:

Moi je définis chez moi ma OleDbCommand comme ceci (en mettant tes variables) et avant d'ouvrir la connexion :

Citation:

---

Dim cmd As New OleDb.OleDbCommand("SELECT * FROM test where date_du_jour= '" & jour & "'",cnn)

---

Pour mon Datagridview, j'ai construis mes colonnes puis lié chaque colonne du datagridview à chaque colonne de ma base access. Dans ta base test, tu as beaucoup de données à importer pour une date précise ?

Edit : Tu as aussi ici quelques infos utiles :
http://plasserre.developpez.com/cour...ees2#LXVII-E-3

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

Dim jour As Date If IsDate(TextBox1.Text) Then jour = Convert.ToDateTime(TextBox1.Text)   If Not cnn.State = ConnectionState.Open Then 'open connection cnn.Open() End If Dim cmd As New OleDb.OleDbCommand("SELECT * FROM test where date_du_jour= '" & jour & "'", cnn)   cmd.Connection = cnn   Dim da As New OleDb.OleDbDataAdapter da.SelectCommand = cmd Dim ds As New DataSet da.Fill(ds) dgvData.DataSource = ds   cmd.ExecuteNonQuery() cnn.Close()   End Sub

---

toujours il m'affiche rien et ne génère pas des erreurs aussi :roll:
j'ai pas fait la liaison des données ,j'ai presque 40 champs dans ma table test

Re,

Regarde le lien que je t'ai mis dans mon post précédent. C'est à peu près le même principe que toi. Tout est bien expliqué (création connexion, command, etc ...)

je pense que le problème est dans le type date ,en effet j'ai changé par un autre champ de la table test qui est de type string et le programme tourne sans erreur et affiche les données dans la datagridview sans problème

ok je vais voir

et comme ceci :

Code:

---

Dim cmd As New OleDb.OleDbCommand("SELECT * FROM test where date_du_jour= #" & Format(jour, "M/d/yyyy") & "#", cnn)

---

ça n'affiche rien aussi :(

Vérifie dans ta base access que tu as choisis le bon format pour la date . Short date il me semble.

le format choisi c'est Date/Heure comment le mettre a short date

Salut,

Lorsque tu es en mode création , pour ta colonne en date/Time ,
Regarde en bas, tu as une ligne format. Fais un clic à droite du champs et tu pourras choisir dans une liste déroulante . Tu peux aussi personnaliser le format. Regarde dans l'aide d'access.

salut

Même chose :roll: il n'affiche rien

re,

comment fais-tu la saisie de la date dans ton textbox ?
regarde qu'elle valeur prend la variable jour. §Tu peux faire comme celà :
Sous la ligne :

Code:

---

If IsDate(TextBox1.Text) Then jour = Convert.ToDateTime(TextBox1.Text)

---

tu mets :

Code:

---

msgbox(textbox1.text & " " & jour)

---

Dis moi ce qui apparait dans la fenêtre