Rat
Well-known member
How do i fill a ComboBox with a database column, called "ID" ?
strSQL = "SELECT ID FROM myTable"
cmd = new oledbcommand(strSQL, myConnection)
objread = cmd.ExecuteReader()
While objread.Read
comboBox1.Items.Add(objread("ID"))
End While
objread.close()
[size=2]com.CommandText = "Select Id from Table_name"
com.Connection = con
[/size][size=2][color=#0000ff]Try
[/color][/size][size=2][color=#0000ff]If[/color][/size][size=2] con.State = ConnectionState.Closed [/size][size=2][color=#0000ff]Then
[/color][/size][size=2]con.Open()
[/size][size=2][color=#0000ff]End[/color][/size][size=2][color=#0000ff]If
[/color][/size][size=2]reader = com.ExecuteReader()
[/size][size=2][color=#0000ff]Do[/color][/size][size=2][color=#0000ff]While[/color][/size][size=2] reader.Read
cmbId.Items.Add(reader(0))
[/size][size=2][color=#0000ff]Loop
[/color][/size][size=2]reader.Close()
con.Close()
[/size][size=2][color=#0000ff]Catch[/color][/size][size=2] ex [/size][size=2][color=#0000ff]As[/color][/size][size=2] Exception
MsgBox(ex.Message)
[/size][size=2][color=#0000ff]If[/color][/size][size=2] con.State = ConnectionState.Open [/size][size=2][color=#0000ff]Then
[/color][/size][size=2]con.Close()
[/size][size=2][color=#0000ff]End[/color][/size][size=2][color=#0000ff]If
[/color][/size][size=2][color=#0000ff]End[/color][/size][size=2][color=#0000ff]Try[/color][/size]