<pre> provider = "Provider=Microsoft.Ace.Oledb.12.0;" dbtblats = "Data Source =ATSDatabase.accdb;" tblatsconnection.ConnectionString = provider & dbtblats tblatsconnection.Open() SqlQuery = "SELECT * FROM ATS" datblats = New OleDb.OleDbDataAdapter(SqlQuery, tblatsconnection) ' datblats.Fill(dstblats, "ATS") tblatsconnection.Close() Me.ListBox1.DataSource = dstblats.Tables("ATS") Me.ListBox1.DisplayMember = "FullNameCN"
<pre> Listbox1.DataSource = Nothing provider = "Provider=Microsoft.Ace.Oledb.12.0;" dbtblats = "Data Source =ATSDatabase.accdb;" tblatsconnection.ConnectionString = provider & dbtblats tblatsconnection.Open() SqlQuery = "SELECT * FROM ATS WHERE DateProcessed IS NULL ORDER BY DateReceived DESC" datblats = New OleDb.OleDbDataAdapter(SqlQuery, tblatsconnection) ' datblats.Fill(dstblats, "ATS") tblatsconnection.Close() Me.ListBox1.DataSource = dstblats.Tables("ATS") Me.ListBox1.DisplayMember = "FullNameCN"
listbox1.items.clear
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)