Discussion :

[kh.akram09]

Bonjour Professionnels

Je veux ajouter des nouveaux items a mon combobox et modifier la propriété text aprés le remplissage avec datasource mé j'arrive pas à le faire

Merci d'avance

Voici Mon 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
17
18
19
20
21
22
23
24
 
Public Sub RemplirComboboxRamasseur(ByVal cmb As ComboBox)
        If ds.Tables.Count <> 0 Then
            ds.Tables.Clear()
        End If
        Dim p As Prototype
        Connecter()
        Dim sql As String
        sql = " select NumEmployé,NomEmployé FROM Employé where Fonction='Ramasseur'"
        cmd.Connection = con
        cmd.CommandText = sql
 
        da.SelectCommand = cmd
        da.Fill(ds, "DTRamasseur")
        cmb.DataSource = ds.Tables("DTRamasseur")
        cmb.DisplayMember = "NumEmployé"
        cmb.ValueMember = "NomEmployé "
 
        cmb.Text = "--Selectionnez un Ramasseur--"
        cmb.Items.Add("--Selectionnez un Ramasseur--")
        cmb.Sorted = True
        dr.Close()
        Deconnecter()
    End Sub

[-N4w4k-]

Bonjour,
Qu'est ce que tu n'arrives pas à faire?

ajouter des nouveaux items a mon combobox

ou

modifier la propriété text aprés le remplissage

ou les deux?

Petite remarque, je ne suis pas très calé en SQL mais il me semble que les accents pour les noms de table et noms de colonne ne sont pas très conseillés..(Employé, NumEmployé, NomEmployé..)

[Invité]

A la place du code ci-dessous:

Code :

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

1
2
cmb.Text = "--Selectionnez un Ramasseur--"
cmb.Items.Add("--Selectionnez un Ramasseur--")

tu mets

Code :

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

1
2
cmb.Items.Add(new ListItem("--Selectionnez un Ramasseur--", "0"));
cmb.SelectedValue="0";

Et normalement cela doit marcher