Code vb.net

Pacome.k -  
Bonjour à tous, Respect à tous les grands de la programmation, moi je ne suis qu'un débutant avec quelques préoccupations. je travail petit à petit sur un gestionnaire de stock et je rencontre une difficulté. quand j'ouvre le combobox (catégorie produit) et fait le choix , les produits de cette catégorie s'affichent dans le combobox(LibelleProduit) et quand je clique sur un produit, il me donne des information du Fournisseur . sachant que un produit peut avoir plusieurs fournisseurs, je souhaiterai quand je clique sur un fournisseur du combobox(3) les informations tels que le prix du produit ...et tout le reste apparaitra dans les textbox. jusque là je n'arrive pas à le faire. aidez moi svp !

14 réponses

  1. Pacome.k Auteur
    vb.net est un défi pour mois sur tout que je développait auparavant mes applications sous uniquement, j'ai voulu monter en niveau avec un langage de programmation pour parfaire mes application. faut dire que dans ma position actuel je m'auto-forme. donc j'ai vraiment besoin de vous , de votre soutien, vos conseils et explications pour grandir dans ce milieu. merci, merci et encore merci. j'ai un numéro whatsapp qui est le numéro supprimé par la.modération sur le quel je peux recevoir du vocal. et des cours approfondir sur vb.net
    0
    1. Utilisateur anonyme
      Je pense que dans un premier temps le.cours de Tahé, te serait plus profitable.
      Mais c’est toi qui vois
      0
  2. Pacome.k Auteur
    Salut et Grand respect à toi pour l'attention que tu portes à ma préoccupation et le soucis manifeste de m'aider à acquérir un bon niveau en programmation vb.net .
    0
    1. Pacome.k Auteur
      j'ai pas de classe métier dans mon formulaire... je ne te saisi pas bien ! sois plus explicite en m'aidant
      0
      1. Utilisateur anonyme
        Je te conseille de lire ceci
        https://codes-sources.commentcamarche.net/forum/affich-10107769-message-a-tous-les-debutants-souvent-autodidactes#p10107769
        0
    2. Pacome.k Auteur
      j'aurai aimer que quand je selectionne le produit , tous les fornisseurs de ce produit apparaissent dans le combobox fournisseur et quand je clique sur ce fornisseur je vois afficher toutes les informations figurant dans l'image défini plus haut. c'est mon seul soucis qui est là !
      0
      1. Utilisateur anonyme
        Oui et donc pourquoi tu n'as pas codé de classe(s) métier?
        0
    4. Utilisateur anonyme
      Pourquoi n’as tu pas codé de classe métier ?
      0
      1. Utilisateur anonyme
        Il faut choisir les balises avec le langage basic et poster le code à l’intérieur de celles ci
        0
        1. Pacome.k Auteur
          j'ai essayé de suivre l'exemple de la source que vous m'avez envoyé...
          0
          1. Pacome.k Auteur 
            Public Class Modification_Produit

    'cette procedure permet d'ouvrir la table Produit et de selectionnner uniquement la catégorie du produit
    Dim conn As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OleDb.12.0;data source=" & Application.StartupPath & "\Gst.accdb")

    Private Sub Modification_Produit_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        conn.Open()
        Dim cmd6 As New OleDb.OleDbCommand("select distinct CategorieProduit from Produit", conn)
        Dim dr6 As OleDb.OleDbDataReader = cmd6.ExecuteReader
        cmbAfficheCatego.Items.Clear()
        While dr6.Read()
            cmbAfficheCatego.Items.Add(dr6("CategorieProduit"))
        End While
        conn.Close()


        conn.Open()
        Dim cmd4 As New OleDb.OleDbCommand("select Fournisseur from Produit", conn)
        Dim dr4 As OleDb.OleDbDataReader = cmd4.ExecuteReader
        cmbAncienFournisseur.Items.Clear()
        While dr4.Read()
            cmbAncienFournisseur.Items.Add(dr4("Fournisseur"))
        End While
        conn.Close()



    End Sub
    ' la procédure suivant permet afficher en fonction de la categorie choisie, le produit 

    Private Sub cmbAfficheCatego_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbAfficheCatego.SelectedIndexChanged
        conn.Open()
        Dim cmd7 As New OleDb.OleDbCommand("select Distinct LibelleProduit from Produit where CategorieProduit='" + cmbAfficheCatego.Text + "'", conn)
        Dim dr7 As OleDb.OleDbDataReader = cmd7.ExecuteReader
        'ce petit code qui suit permet d'effacer le contenu du combobox2 apres un choix
        cmbDesignation.Text = ""
        cmbDesignation.Items.Clear()
        While dr7.Read()
            cmbDesignation.Items.Add(dr7("LibelleProduit"))
        End While
        conn.Close()
    End Sub
    'cette procedure permet d'afficher l'ancien prix du produit choisi et son code

    Private Sub cmbDesignation_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbDesignation.SelectedIndexChanged
        
        Dim cn As New OleDb.OleDbConnection
        Dim cmd As New OleDb.OleDbCommand
        Dim dr As OleDb.OleDbDataReader
        cn.ConnectionString = "Provider=Microsoft.ACE.OleDb.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
        cn.Open()
        cmd.Connection = cn
        cmd.CommandText = "select * From Produit where LibelleProduit='" & cmbDesignation.Text & "'"
        dr = cmd.ExecuteReader
        While dr.Read
            txtAncienPU.Text = dr.GetValue(2)
            txtCodeProduit.Text = dr.GetValue(0)
            txtAncienPUV.Text = dr.GetValue(8)
            cmbAncienFournisseur.Text = dr.GetValue(6)
            txtAncienNbContenant.Text = dr.GetValue(3)
            txtAncienQteparcontenance.Text = dr.GetValue(4)
            txtAncienEmplacement.Text = dr.GetValue(7)
            txtancienStockmini.Text = dr.GetValue(9)



        End While
        ' après selection d'un produit, le curseur se place sur le nouveau prix. cette formule qui suit nous permet d'exécuter cette opération
        txtNouveauNom.Focus()
    End Sub

    Private Sub txtNouveauNom_TextChanged(sender As Object, e As EventArgs) Handles txtNouveauNom.TextChanged
        ' ce code permet d'activer le bouton ModifierNom quand la zonne de texte txtNouveauNom est activée
        If txtNouveauNom.Text <> "" Then
            btnModifierNom.Enabled = True
        Else
            btnModifierNom.Enabled = False
        End If
    End Sub

    Private Sub txtNouveauPU_TextChanged(sender As Object, e As EventArgs) Handles txtNouveauPU.TextChanged

        ' ce code permet d'activer le bouton ModifierPU lorsque la zone de texte est activée et contien du numérique

        If IsNumeric(txtNouveauPU.Text) Then
            btnModifierPU.Enabled = True
        Else
            txtNouveauPU.Text = ""
            btnModifierPU.Enabled = False
        End If



    End Sub

    Private Sub btnModifierNom_Click(sender As Object, e As EventArgs) Handles btnModifierNom.Click
        'ce code permet de modifier le nom du produit, a la fin de la modification, il faut vider les champs de saisie


        Dim cn11 As New OleDb.OleDbConnection
        Dim cmd11 As New OleDb.OleDbCommand
        cn11.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
        cn11.Open()
        cmd11.Connection = cn11
        cmd11.CommandText = " Update Produit set LibelleProduit='" & txtNouveauNom.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
        cmd11.ExecuteNonQuery()
        MsgBox("le Nom du Produit modifié avec succes", MsgBoxStyle.Information, "Modification du Nom")
        cmbDesignation.Text = ""
        txtNouveauNom.Text = ""
        txtAncienPU.Text = ""
        txtNouveauPU.Text = ""
        txtCodeProduit.Text = ""
        txtAncienPUV.Text = ""
        cmbAncienFournisseur.Text = ""
        txtAncienNbContenant.Text = ""
        txtAncienQteparcontenance.Text = ""
        txtAncienEmplacement.Text = ""
        txtancienStockmini.Text = ""
        txtNvPUV.Text = ""
        txtNvFournisseur.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvlEmplacement.Text = ""
        txtNveauStockmini.Text = ""
        txtNvQteparContenant.Text = ""
        cmbDesignation.Items.Clear()



        'cmbDesignation.Items.Clear()

        'conn.Open()
        'Dim cmd7 As New OleDb.OleDbCommand("select LibelleProduit from Produit where CategorieProduit='" + cmbAfficheCatego.Text + "'", conn)
        'Dim dr7 As OleDb.OleDbDataReader = cmd7.ExecuteReader
        'ce petit code qui suit permet d'effacer le contenu du combobox2 apres un choix
        'cmbDesignation.Text = ""
        'cmbDesignation.Items.Clear()
        'While dr7.Read()
        'cmbDesignation.Items.Add(dr7("LibelleProduit"))
        'End While
        conn.Close()








    End Sub

    Private Sub btnModifierPU_Click(sender As Object, e As EventArgs) Handles btnModifierPU.Click
        'ce code permet de modifier le PU du Produit sélectionné, a la fin de la modification, il faut vider les champs de saisie

        'modification de l'"lement concerné dans la base
        Dim cn As New OleDb.OleDbConnection
        Dim cmd As New OleDb.OleDbCommand
        cn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
        cn.Open()
        cmd.Connection = cn
        cmd.CommandText = " Update Produit set PUProduit='" & txtNouveauPU.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
        cmd.ExecuteNonQuery()
        MsgBox("le PU du Produit modifié avec succes", MsgBoxStyle.Information, "Modification du PU")
        cmbDesignation.Text = ""
        txtNouveauNom.Text = ""
        txtAncienPU.Text = ""
        txtNouveauPU.Text = ""
        txtCodeProduit.Text = ""
        txtAncienPUV.Text = ""
        cmbAncienFournisseur.Text = ""
        txtAncienNbContenant.Text = ""
        txtAncienQteparcontenance.Text = ""
        txtAncienEmplacement.Text = ""
        txtancienStockmini.Text = ""
        txtNvPUV.Text = ""
        txtNvFournisseur.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvlEmplacement.Text = ""
        txtNveauStockmini.Text = ""
        txtNvQteparContenant.Text = ""
        cmbDesignation.Items.Clear()

    End Sub


   
    
    Private Sub btnFournisseur_Click(sender As Object, e As EventArgs) Handles btnFournisseur.Click
        'modification de l'"lement concerné dans la base
        Dim cn21 As New OleDb.OleDbConnection
        Dim cmd21 As New OleDb.OleDbCommand
        cn21.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
        cn21.Open()
        cmd21.Connection = cn21
        cmd21.CommandText = " Update Produit set Fournisseur='" & txtNvFournisseur.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
        cmd21.ExecuteNonQuery()
        MsgBox("le Fournisseur du Produit modifié avec succes", MsgBoxStyle.Information, "Modification Fournisseur")
        cmbDesignation.Text = ""
        txtNouveauNom.Text = ""
        txtAncienPU.Text = ""
        txtNouveauPU.Text = ""
        txtCodeProduit.Text = ""
        txtAncienPUV.Text = ""
        cmbAncienFournisseur.Text = ""
        txtAncienNbContenant.Text = ""
        txtAncienQteparcontenance.Text = ""
        txtAncienEmplacement.Text = ""
        txtancienStockmini.Text = ""
        txtNvPUV.Text = ""
        txtNvFournisseur.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvlEmplacement.Text = ""
        txtNveauStockmini.Text = ""
        txtNvQteparContenant.Text = ""
        cmbDesignation.Items.Clear()

       


    End Sub

    Private Sub txtNvFournisseur_TextChanged(sender As Object, e As EventArgs) Handles txtNvFournisseur.TextChanged
        ' ce code permet d'activer le bouton ModifierNom quand la zonne de texte est activée
        If txtNvFournisseur.Text <> "" Then
            btnFournisseur.Enabled = True
        Else
            btnFournisseur.Enabled = False
        End If
    End Sub
    'modification de l'"lement concerné dans la base
    Private Sub btnNbdeContenant_Click(sender As Object, e As EventArgs) Handles btnNbdeContenant.Click
        Dim cn21 As New OleDb.OleDbConnection
        Dim cmd21 As New OleDb.OleDbCommand
        cn21.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
        cn21.Open()
        cmd21.Connection = cn21
        cmd21.CommandText = " Update Produit set Nb_Contenant='" & txtNvnombrecontenant.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
        cmd21.ExecuteNonQuery()
        MsgBox("le le nomre de contenant Produit modifié avec succes", MsgBoxStyle.Information, "Modification nb conenant")
        cmbDesignation.Text = ""
        txtNouveauNom.Text = ""
        txtAncienPU.Text = ""
        txtNouveauPU.Text = ""
        txtCodeProduit.Text = ""
        txtAncienPUV.Text = ""
        cmbAncienFournisseur.Text = ""
        txtAncienNbContenant.Text = ""
        txtAncienQteparcontenance.Text = ""
        txtAncienEmplacement.Text = ""
        txtancienStockmini.Text = ""
        txtNvPUV.Text = ""
        txtNvFournisseur.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvlEmplacement.Text = ""
        txtNveauStockmini.Text = ""
        txtNvQteparContenant.Text = ""
        cmbDesignation.Items.Clear()

    End Sub

    Private Sub txtNvQteparContenant_TextChanged(sender As Object, e As EventArgs) Handles txtNvQteparContenant.TextChanged
        ' ce code permet d'activer le bouton ModifierNom quand la zonne de texte  est activée
        If txtNvQteparContenant.Text <> "" Then
            btnQteparContenance.Enabled = True
        Else
            btnQteparContenance.Enabled = False
        End If

    End Sub
    'modification de l'"lement concerné dans la base
    
    Private Sub btnQteparContenance_Click(sender As Object, e As EventArgs) Handles btnQteparContenance.Click
        Dim cn21 As New OleDb.OleDbConnection
        Dim cmd21 As New OleDb.OleDbCommand
        cn21.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
        cn21.Open()
        cmd21.Connection = cn21
        cmd21.CommandText = " Update Produit set Quantite='" & txtNvQteparContenant.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
        cmd21.ExecuteNonQuery()
        MsgBox("le nombre de Produit modifié avec succes", MsgBoxStyle.Information, "Modification nb de produit")
        cmbDesignation.Text = ""
        txtNouveauNom.Text = ""
        txtAncienPU.Text = ""
        txtNouveauPU.Text = ""
        txtCodeProduit.Text = ""
        txtAncienPUV.Text = ""
        cmbAncienFournisseur.Text = ""
        txtAncienNbContenant.Text = ""
        txtAncienQteparcontenance.Text = ""
        txtAncienEmplacement.Text = ""
        txtancienStockmini.Text = ""
        txtNvPUV.Text = ""
        txtNvFournisseur.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvlEmplacement.Text = ""
        txtNveauStockmini.Text = ""
        txtNvQteparContenant.Text = ""
        cmbDesignation.Items.Clear()
    End Sub
    'modification de l'"lement concerné dans la base
    Private Sub btnModifierPUV_Click(sender As Object, e As EventArgs) Handles btnModifierPUV.Click
        Dim cn21 As New OleDb.OleDbConnection
        Dim cmd21 As New OleDb.OleDbCommand
        cn21.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
        cn21.Open()
        cmd21.Connection = cn21
        cmd21.CommandText = " Update Produit set PUVProduit='" & txtNvPUV.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
        cmd21.ExecuteNonQuery()
        MsgBox("le prix unitaire de vente modifié avec succes", MsgBoxStyle.Information, "Modification PUV de produit")
        cmbDesignation.Text = ""
        txtNouveauNom.Text = ""
        txtAncienPU.Text = ""
        txtNouveauPU.Text = ""
        txtCodeProduit.Text = ""
        txtAncienPUV.Text = ""
        cmbAncienFournisseur.Text = ""
        txtAncienNbContenant.Text = ""
        txtAncienQteparcontenance.Text = ""
        txtAncienEmplacement.Text = ""
        txtancienStockmini.Text = ""
        txtNvPUV.Text = ""
        txtNvFournisseur.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvlEmplacement.Text = ""
        txtNveauStockmini.Text = ""
        txtNvQteparContenant.Text = ""
        cmbDesignation.Items.Clear()
    End Sub
    'modification de l'"lement concerné dans la base
    Private Sub btnStockMini_Click(sender As Object, e As EventArgs) Handles btnStockMini.Click
        Dim cn21 As New OleDb.OleDbConnection
        Dim cmd21 As New OleDb.OleDbCommand
        cn21.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
        cn21.Open()
        cmd21.Connection = cn21
        cmd21.CommandText = " Update Produit set StockMini='" & txtNveauStockmini.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
        cmd21.ExecuteNonQuery()
        MsgBox("le stock mini modifié avec succes", MsgBoxStyle.Information, "Modification du stockmini du produit")
        cmbDesignation.Text = ""
        txtNouveauNom.Text = ""
        txtAncienPU.Text = ""
        txtNouveauPU.Text = ""
        txtCodeProduit.Text = ""
        txtAncienPUV.Text = ""
        cmbAncienFournisseur.Text = ""
        txtAncienNbContenant.Text = ""
        txtAncienQteparcontenance.Text = ""
        txtAncienEmplacement.Text = ""
        txtancienStockmini.Text = ""
        txtNvPUV.Text = ""
        txtNvFournisseur.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvlEmplacement.Text = ""
        txtNveauStockmini.Text = ""
        txtNvQteparContenant.Text = ""
        cmbDesignation.Items.Clear()
    End Sub
    'modification de l'"lement concerné dans la base
    Private Sub btnEmplacement_Click(sender As Object, e As EventArgs) Handles btnEmplacement.Click
        Dim cn21 As New OleDb.OleDbConnection
        Dim cmd21 As New OleDb.OleDbCommand
        cn21.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;data source=" & Application.StartupPath & "\Gst.accdb"
        cn21.Open()
        cmd21.Connection = cn21
        cmd21.CommandText = " Update Produit set Emplacement='" & txtNvlEmplacement.Text & "' where CodeProduit='" & txtCodeProduit.Text & "'"
        cmd21.ExecuteNonQuery()
        MsgBox("l'emplacement du Produit modifié avec succes", MsgBoxStyle.Information, "Modification de l'emplacement produit")
        cmbDesignation.Text = ""
        txtNouveauNom.Text = ""
        txtAncienPU.Text = ""
        txtNouveauPU.Text = ""
        txtCodeProduit.Text = ""
        txtAncienPUV.Text = ""
        cmbAncienFournisseur.Text = ""
        txtAncienNbContenant.Text = ""
        txtAncienQteparcontenance.Text = ""
        txtAncienEmplacement.Text = ""
        txtancienStockmini.Text = ""
        txtNvPUV.Text = ""
        txtNvFournisseur.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvnombrecontenant.Text = ""
        txtNvlEmplacement.Text = ""
        txtNveauStockmini.Text = ""
        txtNvQteparContenant.Text = ""
        cmbDesignation.Items.Clear()
    End Sub

    Private Sub txtNvPUV_TextChanged(sender As Object, e As EventArgs) Handles txtNvPUV.TextChanged
        ' ce code permet d'activer le bouton ModifierNom quand la zonne de texte  est activée
        If txtNvPUV.Text <> "" Then
            btnModifierPUV.Enabled = True
        Else
            btnModifierPUV.Enabled = False
        End If
    End Sub

    Private Sub txtNvnombrecontenant_TextChanged(sender As Object, e As EventArgs) Handles txtNvnombrecontenant.TextChanged
        ' ce code permet d'activer le bouton ModifierNom quand la zonne de texte est activée
        If txtNvnombrecontenant.Text <> "" Then
            btnNbdeContenant.Enabled = True
        Else
            btnNbdeContenant.Enabled = False
        End If
    End Sub

    Private Sub txtNvlEmplacement_TextChanged(sender As Object, e As EventArgs) Handles txtNvlEmplacement.TextChanged
        ' ce code permet d'activer le bouton ModifierNom quand la zonne de texte txtNouveauNom est activée
        If txtNvlEmplacement.Text <> "" Then
            btnEmplacement.Enabled = True
        Else
            btnEmplacement.Enabled = False
        End If
    End Sub

    Private Sub txtNveauStockmini_TextChanged(sender As Object, e As EventArgs) Handles txtNveauStockmini.TextChanged
        ' ce code permet d'activer le bouton ModifierNom quand la zonne de text est activée
        If txtNveauStockmini.Text <> "" Then
            btnStockMini.Enabled = True
        Else
            btnStockMini.Enabled = False
        End If
    End Sub
    'afficher le fournisseur en fonction du produit selectionné
    Private Sub cmbAncienFournisseur_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbAncienFournisseur.SelectedIndexChanged
        conn.Open()
        Dim cmd7 As New OleDb.OleDbCommand("select Fournisseur from Produit where LibelleProduit='" + cmbAncienFournisseur.Text + "'", conn)
        Dim dr7 As OleDb.OleDbDataReader = cmd7.ExecuteReader
        'ce petit code qui suit permet d'effacer le contenu du combobox2 apres un choix
        cmbAncienFournisseur.Text = ""
        cmbAncienFournisseur.Items.Clear()
        While dr7.Read()
            cmbAncienFournisseur.Items.Add(dr7("Fournisseur"))
        End While
        conn.Close()
    End Sub

  
    
End Class
            0
            1. Utilisateur anonyme
              Lors de ma première réponse, je t’ai mis un lien vers un tuto expliquant comment poster un code lisible.
              On commencera à essayer de t’aider quand tu l’auras posté correctement.
              0
              1. Pacome.k Auteur
                je veux pouvoir obtenir quelque chose comme ça dans ce formulaire. merci pour votre aide !
                0
                2. Utilisateur anonyme
                  Ok, ça vient d’access, peux tu poster le code qui lit les tables ?
                  0
                  1. Pacome.k Auteur
                    Grand respect à vous tous, vous êtes nos devanciers et nos icones dans la programmation, infiniment merci d'apporter une attention à nos préoccupation. Respect à toi Whismeril !
                    j'ais lié mon projet à une base Access nommée Gst
                    0
                    1. Utilisateur anonyme
                      Dans ma boule de cristal, je vois qu'il manque une pinte à la ligne 1664.

                      Ha tu voulais une réponse sérieuse, ben il faut poser une question sérieuse...

                      D’où viennent tes données ?
                      Comment les lies tu aux combobox ?

                      Montrer le ou les morceaux de codes de la récupération des données et de leurs distributions seraitune bonne chose, y’a « 36 » façons de faire, autant répondre avec ce que tu as fait.
                      Ou t’expliquer pourquoi autrement pourrait être mieux.
                      Voir ce petit tuto https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
                      On pourra commencer à essayer de t’aider quand on aura des éléments.

                      0

                      Discussions similaires

                      C'est quoi un BILLING ZIP CODE
                      bikanane

                      1 réponse
                      Où sont stockés les QR codes sur android ?
                      zatox19

                      11 réponses
                      Code de renvoi d'appel : Ooredo, Mobilis...
                      midoou07

                      13 réponses