Discussion :

[nadou89]

bonsoir
je voudrais afficher les données d'une base de données (SqlServer 2005) dans un DataGridView à partir du combobox : je sélectionne la date dans le comboBox et je veux que les données de cette date s'affiche dans un DataGridView
comment je peux faire ça qui peut m'aider !!

[anonymousse]

bonsoir,

as-tu parcouru les tutos VB.NET DataGridView http://vb.net-informations.com/

tu y as ton bonheur (normalement) !

bon code ...

[nadou89]

j'ai pas trouvé ce que je veux :
moi je veux selectionner une année dans le combobox et j'affiche les données correspondant à cette année dans un datagridview
qui peut m'aider !!!

[MABROUKI]

Bonjour
NADOU89
voici un bout de code qui "pique" une date dans le DateTimePicker et l'envoie dans une cellule date de ton DataGridView
Colle dans le code de ton form et execute.

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
24
25
26
27
28
29
30
31
32
33
34
35
 
 
'Ajoute 2 controles :
'-DateTimePicker
'-DataGridView
'Selectionne une colonne date ,"pique" une date et click
Public Class Form1
    Private Sub DateTimePicker1_ValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DateTimePicker1.ValueChanged
        If Me.DataGridView1.CurrentCell.ColumnIndex = 1 Then
            Me.DataGridView1.CurrentCell.Value = DateTimePicker1.Value.ToLongDateString
            Me.DataGridView1.Update()
        End If
        'affiche format long apres conversion en type string
        MsgBox("date change format long : " & DateTimePicker1.Value.ToLongDateString)
        If Me.DataGridView1.CurrentCell.ColumnIndex = 2 Then
            Me.DataGridView1.CurrentCell.Value = DateTimePicker1.Value.ToShortDateString
            Me.DataGridView1.Update()
        End If
        'affiche format court apres conversion en type string
        MsgBox("date change format long : " & DateTimePicker1.Value.ToShortDateString)
 
    End Sub
    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        'exemple avec un datagridview contenant 3 colonnnes 
        'CREE TROIS COLONNES
        Me.DataGridView1.Columns.Add("Nom", "NOM")
        Me.DataGridView1.Columns.Add("DateUsuelle", "DATE USUELLE")
        Me.DataGridView1.Columns.Add("DateCourte", "DATE COURTE")
        'AJOUTE UNE 1ere LIGNE
        Me.DataGridView1.Rows.Add("Paul", DateAndTime.Now.ToLongDateString, DateAndTime.Now.ToShortDateString)
        'AJOUTE UNE 2e  LIGNE
        Me.DataGridView1.Rows.Add("Nadou89", DateAndTime.Now.ToLongDateString, DateAndTime.Now.ToShortDateString)
 
    End Sub
End Class

bon code....

[BuchsPa]

Bonjour,

Malheureusement je ne connais pas trop le VB, par contre ce que je peux te conseiller c'est de travailler avec le dataBinding. Comme ça il suffit de récupérer la valeur de la combobox et de passer cette valeur en temps que paramètre dans ta requête.

J'espère avoir pu t'aider

[peregna2007]

Salut,

Essai d'ajuster ce bout de code et le mettre derrière ton controle DateTimePicker1

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
  Try
            Dim MyYear = (DateTimePicker1.Value).Year
 
            'Remplissage du DataGrid
            Dim DS As DataSet = New DataSet
            Dim mondA As SqlDataAdapter
            Dim MaRequete As String = "SELECT * FROM client WHERE Valeur_Rechercher=" & MyYear
 
            custConn1.Open()
            mondA = New SqlDataAdapter(MaRequete, custConn1)
            mondA.Fill(DS, "client")
            DataGridView1.DataSource = DS.Tables(0).DefaultView
            custConn1.Close()
        Catch
            MsgBox(Err.Description)
        Finally
        End Try

[nadou89]

bonsoir à tous
j'ai pas trouver une solution de ce que je voudrai
voici l'image "date.jpg" montre exactement ce que je voudrai afficher exactement j'ai les données dans un datagridview sont afficher à partir de la table reglement et je voudrai afficher les données d'une année que je choisi à partir du combobox
comment je peux faire ça qui peut m'aider !!

[Anklor]

il faut travailler la requête.
Un bon tuto sur sql server et son type DateTime
http://baptiste-wicht.developpez.com.../datetime/#LVI

[peregna2007]

Salut,

Essai ce bout de code, je crois que cela doit répondre à ta préoccupation.

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
Try
 
            'Remplissage du DataGrid
            Dim DS As DataSet = New DataSet
            Dim mondA As SqlDataAdapter
            Dim MaRequete As String = "SELECT * FROM reglement  WHERE datepart('yyyy',datecheance)=" & ComboBox1.Text
 
            custConn1.Open()
            mondA = New SqlDataAdapter(MaRequete, custConn1)
            mondA.Fill(DS, "reglement")
            DataGridView1.DataSource = DS.Tables(0).DefaultView
            custConn1.Close()
        Catch
            MsgBox(Err.Description)
        Finally
        End Try

[nadou89]

bonjour peregna2007
où je peux mettre ce code !! est ce que sous Form_load ou non ou bien où ??

[nadou89]

merci à tout personne qui m'aide
j'ai trouvé une solution j'ai mis le code sous :

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
Private Sub cmbdate_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmbdate.SelectedIndexChanged
Try
 
            'Remplissage du DataGrid
            Dim DS As DataSet = New DataSet
            Dim mondA As SqlDataAdapter
            Dim MaRequete As String = "SELECT * FROM reglement  WHERE datepart('yyyy',datecheance)=" & ComboBox1.Text
 
            custConn1.Open()
            mondA = New SqlDataAdapter(MaRequete, custConn1)
            mondA.Fill(DS, "reglement")
            DataGridView1.DataSource = DS.Tables(0).DefaultView
            custConn1.Close()
        Catch
            MsgBox(Err.Description)
        Finally
        End Try
End Sub