'-------------------------- ' Create the SelectCommand...for Contacts.Company '-------------------------- oledbCMD = New OleDbCommand("SELECT DISTINCT Company " & _ "FROM Contacts " & _ "ORDER BY Company", _ oledbConn) ' oledbDA.SelectCommand = oledbCMD oledbDA.Fill(oledbDS, "CompanyLookup") ' cboCompanyLookup.DataSource = oledbDS.Tables("CompanyLookup") ' cboCompanyLookup.DataTextField = "Company" cboCompanyLookup.DataValueField = "Company" cboCompanyLookup.EnableViewState = True cboCompanyLookup.DataBind() cboCompanyLookup.SelectedValue = -1 '-----------------------------------------