Discussion :

[Poupou61]

Bonjour,

J'avais déjà posé cette questions mais l'avais laissé tomber pour avancer sur d'autres points. Mais j'ai quand même avancé un peu.

Donc, j'ai datagridview avec le détail de mes commandes(NumCommande, NumFour, RaisonSocialeFour...) eux même contenus dans une bdd.

Et dans mon Form, j'ai un Combobox avec les raisons sociale des fournisseurs. Et, j'aimerais en en sélectionnant un n'afficher que les commandes de ce fournisseur.

Pour cela j'ai commencé comma ça :

Code vb.net :

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
Private req As String = "Select count(Fournisseur.NumFour) from (fournisseur inner join commande on Fournisseur.NumFour = Commande.NumFournisseur)inner join Contenir_Commande on Commande.NumCommande = Contenir_Commande.NumCommande where RaisonSocialeFour =@Four"
Private req2 As String = "SELECT Contenir_Commande.NumCommande, Contenir_Commande.NumProduit, Contenir_Commande.QuantiteCommande, Commande.DateCommmande, Fournisseur.RaisonSocialeFour FROM ((Contenir_Commande INNER JOIN Commande ON Contenir_Commande.NumCommande = Commande.NumCommande) INNER JOIN Fournisseur ON Commande.Numfournisseur = Fournisseur.NumFour) Where RaisonSocialeFour = @Four"
 
    Private Sub CbxFournisseur_SelectedValueChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CbxFournisseur.SelectedValueChanged
        Try
            Dim con As New OleDb.OleDbConnection("Ma chaine de connexion")
            Dim commande As New OleDb.OleDbCommand(req, con)
            Dim reader As Integer
            con.Open()
            commande.Parameters.AddWithValue("@Four", CbxFournisseur.Text)
            reader = commande.ExecuteScalar
            If reader >= 1 Then
                'je ne sais pas quoi mettre !
 
            Else
                MsgBox("Aucune commande pour ce fournisseur.")
            End If
 
        Catch ex As Exception
            MessageBox.Show("" + ex.Message)
        End Try
    End Sub

Le Else fonctionne mais comme vous pouvez le voir je bug car je ne sais pas quoi mettre dans le If.

Que faudrait il mettre ?

(req2 serait la requête de ce que je veux afficher après avoir sélectionné un fournisseur dans ma combobox)

Merci d'avance

[mactwist69]

Bonjour,

Tes requêtes sont un peu biscornu non ? A base d'un select from un résultat et de inner join imbriquer... A mon avis il y a moyen d'amélioré ça, en tout cas la deuxième.

Bon ensuite... plutôt que de faire 2 requêtes: 1 pour vérifier si il existe des enregistrement et une pour les rapatrié.

Tu pourrais faire directement la deuxième requête, stocker le résultat dans une datatable d'un dataset.

Ensuite tu fais un test sur le nombre de ligne dans ta datatable, et c'est la que tu fais ton if.

Code :

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

1
2
3
4
5
If Madatatable.rows.count=0 then
       Msgbox ("pas d'enregistrement")
else
       MonDatagridView.Datasource=MonDataset.Madatatable
End if

Et le résultat s'affiche.

[Graffito]

Je préconiserai plutot d'intercaler un BindingSource entre le DataGridView et son DataSource. Ainsi, en paramétrant la propriété Filter du BindingSource, on n'affichera qu'une partie du DataSource et pas besoin de recharger le DataSource à chaque fois qu'on redéfinit un filtre.

Idem pour la propriété Sort du BindingSource qui permet de définir l'ordre d'affichage des lignes du DataGridView.

[sinople]

Je préconiserai plutot d'intercaler un BindingSource entre le DataGridView et son DataSource. Ainsi, en paramétrant la propriété Filter du BindingSource, on n'affichera qu'une partie du DataSource et pas besoin de recharger le DataSource à chaque fois qu'on redéfinit un filtre.

Idem pour la propriété Sort du BindingSource qui permet de définir l'ordre d'affichage des lignes du DataGridView.

Je te recommande aussi fortement cette solution.

[Poupou61]

Merci, et désolé pour le temps de réponse.

Mais pourriez vous me donner un exemple de code que je vois comment ça fonctionne svp, car je n'ai jamais utilisé tout sa et je suis un peu pommé.