Bonjour,
Je cherche depuis un petit moment à remplacer par la valeur d'un combobox le nom d'un champ dans une requête servant à remplir un datagridview .
Mon code est le suivant:
Je voudrais cependant pouvoir modifier le champ du "Where" à l'aide d'une combobox qui liste tous les champs (DE, EN, FR)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 conn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source = dbgc.mdb;") da = New OleDbDataAdapter("SELECT TerminoID, DE, FR, EN, KUID FROM TblTermino Where DE Like '%" & TextBox1.Text & "%' ORDER BY TerminoID ", conn) Dim cb As New OleDbCommandBuilder(da) dt = New DataTable("Termino") conn.Open() da.Fill(dt) conn.Close() Dim bs As New BindingSource() dv = New DataView(dt) bs.DataSource = dv DataGridView1.DataSource = bs
Comment remplacer le nom du champ par la valeur de la combobox?
Merci pour votre aide.
Guillaume
Partager