none
Ajout de texte dans un ComboBox RRS feed

  • Question

  • Dans une application que je développe, j'ai besoin d'utiliser un ComboBox pour choisir un nom de parcours. Pour remplir le ComboBox, j'utilise une table Access. Lorsque le nom d'un parcours ne figure pas dans la liste, je voudrais pouvoir l'ajouter à la liste et à la table en le saisissant dans le ComboBox. Malgré un certain nombre d'essai, je n'arrive pas à trouver une solution qui fonctionne correctement.

    Merci d'avance

    vendredi 7 février 2014 13:21

Réponses

  • Bonjour,

        Sub AddParcours(parcours As String)
            Using connexion As OleDbConnection = New OleDbConnection()
                connexion.ConnectionString = "< Chaine de connexion >"
                connexion.Open()
    
                Using commande As OleDbCommand = New OleDbCommand()
                    commande.Connection = connexion
                    commande.CommandText = "INSERT INTO MaTable (Parcours) VALUES (?)"
                    commande.Parameters.AddWithValue("parcours", parcours)
    
                    commande.ExecuteNonQuery()
                End Using
            End Using
        End Sub

    Cordialement


    Gilles TOURREAU - MVP C#
    Architecte logiciel/Consultant/Formateur Freelance - P.O.S Informatique
    Blog : http://gilles.tourreau.fr - Suivez-moi sur Twitter
    - MCPD : Enterprise Developper / Windows Developper 3.5 / ASP .NET 3.5/4.0
    - MCSA : SQL Server 2012
    - MCITP : SQL Server 2008 Developper
    - MCTS : ADO .NET 3.5 / SQL Server 2008 Developper / Windows Forms 3.5 / ASP .NET 3.5/4.0 / TFS 2010 / Windows Azure

    • Proposé comme réponse Aurel Bera lundi 10 février 2014 10:03
    • Marqué comme réponse dédé le routier lundi 10 février 2014 12:49
    lundi 10 février 2014 00:35
    Modérateur

Toutes les réponses

  • Bonjour,

        Sub AddParcours(parcours As String)
            Using connexion As OleDbConnection = New OleDbConnection()
                connexion.ConnectionString = "< Chaine de connexion >"
                connexion.Open()
    
                Using commande As OleDbCommand = New OleDbCommand()
                    commande.Connection = connexion
                    commande.CommandText = "INSERT INTO MaTable (Parcours) VALUES (?)"
                    commande.Parameters.AddWithValue("parcours", parcours)
    
                    commande.ExecuteNonQuery()
                End Using
            End Using
        End Sub

    Cordialement


    Gilles TOURREAU - MVP C#
    Architecte logiciel/Consultant/Formateur Freelance - P.O.S Informatique
    Blog : http://gilles.tourreau.fr - Suivez-moi sur Twitter
    - MCPD : Enterprise Developper / Windows Developper 3.5 / ASP .NET 3.5/4.0
    - MCSA : SQL Server 2012
    - MCITP : SQL Server 2008 Developper
    - MCTS : ADO .NET 3.5 / SQL Server 2008 Developper / Windows Forms 3.5 / ASP .NET 3.5/4.0 / TFS 2010 / Windows Azure

    • Proposé comme réponse Aurel Bera lundi 10 février 2014 10:03
    • Marqué comme réponse dédé le routier lundi 10 février 2014 12:49
    lundi 10 février 2014 00:35
    Modérateur
  • Merci pour la solution.
    lundi 10 février 2014 12:50