I have my combobox retrieve all my database tables in MS access 2010, now i want to retrieve all the records in a Listview when i select a table name
Below is my code:
i'm getting Syntax error. Incomplete query clause
Dim tableName As String = ComboBox1.SelectedIndex
strSQL = "SELECT * FROM '" + tableName + "'"
Dim dbcon As OleDb.OleDbConnection
dbcon = New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\mydb.accdb")
dbcon.Open()
cmd = New OleDb.OleDbCommand(strSQL, dbcon)
odr = cmd.ExecuteReader()
ListView1.Items.Clear()
Do While odr.Read()
a = (odr.Item("record_no").ToString())
b = (odr.Item("name").ToString())
Dim lv As ListViewItem = ListView1.Items.Add(a)
lv.SubItems.Add(b)
Loop
odr.Close()
cmd.Dispose()
Connect.Close()
Below is my code:
i'm getting Syntax error. Incomplete query clause
Dim tableName As String = ComboBox1.SelectedIndex
strSQL = "SELECT * FROM '" + tableName + "'"
Dim dbcon As OleDb.OleDbConnection
dbcon = New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\mydb.accdb")
dbcon.Open()
cmd = New OleDb.OleDbCommand(strSQL, dbcon)
odr = cmd.ExecuteReader()
ListView1.Items.Clear()
Do While odr.Read()
a = (odr.Item("record_no").ToString())
b = (odr.Item("name").ToString())
Dim lv As ListViewItem = ListView1.Items.Add(a)
lv.SubItems.Add(b)
Loop
odr.Close()
cmd.Dispose()
Connect.Close()