Discussion :

[Titom1978]

Bonjour à toutes et à tous,

Je viens vers vous pour vous demander de l'aide. J'essaie d'alimenter une listbox à partir de données contenues dans une BDD SQL Serveur.

Voici le code:

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
 
Private Sub frm_new_entry_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        btn_enregistrement.Enabled = False
 
        connexion = "Provider=Microsoft.SQLSERVER.CE.OLEDB.4.0;Data Source=C:\Users\user\Documents\Carburant.sdf"
        connexionOLE.ConnectionString = connexion
        connexionOLE.Open()
        da = New OleDbDataAdapter("Select id_vl, marque, immatriculation from tbl_vehicule", connexionOLE)
        ds = New DataSet()
        da.Fill(ds, "tbl_vehicule")
 
        lb_vl.Items.Add(da.Fill(ds, "tbl_vehicule").ToString)
 
        connexionOLE.Close()
 
    End Sub

Je souhaite voir apparaître dans ma listbox la sélection faite en "da".

Auriez-vous une solution à me proposer (avec des explications, histoire que je comprenne bien! )

Merci d'avance!

[tomlev]

Remplace cette ligne :

Code :

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

     lb_vl.Items.Add(da.Fill(ds, "tbl_vehicule").ToString)

Par ceci :

Code :

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

1
2
3
4
 
     lb_vl.DataSource = ds.Tables("tbl_vehicule")
     lb_vl.ValueMember = "id_vl"
     lb_vl.DisplayMember = "immatriculation" ' Ou "marque", selon ce que tu veux afficher

[Titom1978]

Merci TomLev,

La solution fonctionne très bien. Je suppose que le principe est le même pour une combobox?

Cordialement,

Titom

[tomlev]

Je suppose que le principe est le même pour une combobox?

Oui, c'est pareil

[Titom1978]

Merci pour le coup de main!