Discussion :

[draman212]

Bonjour..
Je veux afficher une liste de choix sous access 2003 dans un combobox sous vb.net.
J'ai utilisé cette requete

Code :

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

select CTN from region where DRT = '" & ComboBox1.Text & "'

mais il ne renvoi qu'un seul enregistrement a la fois.
Pourriez vous m'aiguiller afin que je puisse réaliser cela ?
Et merci d'avance

[hunteshiva]

je suis sur le mm probléme que toi

je pense qu'il faut d'abord que tu compte les ligne de ta base de données
et ensuite une boucle

Code :

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

1
2
3
For i as integer = 1 to nbrLignes 
'et tu met ta recette la dedans
next

[sihammaster]

Bonjour,
Pour remplir ta combobox taper ce code dans ta form load

Code :

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

1
2
3
4
5
6
7
8
9
10
Dim commm As New OleDbCommand("select * from personne", con)
            Dim dadapter As OleDbDataAdapter
            dadapter = New OleDbDataAdapter(commm)
            dadapter.Fill(ds, "personne")
            dt = ds.Tables("personne")
            With Me.ComboBox1
                .DisplayMember = "Nom"  'ici le nom que vous voulez afficher dans combobox
                .ValueMember = "idpersonne"  
                .DataSource = dt
            End With

et pour recuperer les informations de l'enregistrement selectionné

Code :

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

1
2
3
4
5
6
7
8
9
10
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
 
  Dim dr As OleDbDataReader
                       Dim cmd As New OleDbCommand("select * from tatable where condition='" & ComboBox1.SelectedValue & "'", con)
            dr = cmd.ExecuteReader
            While dr.Read
                Label1.Text = dr(0) 'afficher dans label
                      End While
            dr.Close()
    End Sub

Bonne Continuation