Discussion :

[snakeon]

Bonjour,

J'ai un probleme de niveau d'affichage de données dans la zone de textbox a partir d'une base de données access:
J'ai un combobox qui affiche tous les produits qu'ils sont disponibles et quand je choisis un produit apartir du combobox, le prix et la quantité doivent etre affichés sur 2 textbox.
Pour l'affichage des données dans le combobox j'ai mis :

Code :

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

1
2
3
ven_prod.DataSource = dacces.Listdesproduits
Me.ven_prod.DisplayMember = "Nom_Produit"
Me.ven_prod.ValueMember = "Nom_Produit"

et j'ai mis dans la classe dataacces le code suivant pour remplir le texbox quantité:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Public Function prix_achat_vente(ByVal combo_achat As String) As DataTable
        Dim Cmd As New OleDbCommand
        Dim dt As New DataTable
        Try
            Cmd.CommandText = "SELECT Quantité_restee from [Produit] where Nom_Produit='" & combo_achat.ToString & "'"
            dt = Con.Select_DataTable(Cmd)
        Catch ex As Exception
            MsgBox(ex.Message & " Liste des Produits")
        End Try
        Return dt
    End Function

mais j'ai pas trouvé comment afficher les autres données dans les textbox
Merci

[nsanabi]

avec :

Code :

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

combo_achat.selectedItem.ToString()