Help with Retreiving Data..???

[inkfid]

I have an app that adds/removes Companys and their Locations as two seperate fields in a table.

What I want to do when my app loads is fill a combo box with each company name once, regardless of how many times it appears in the data base.

I am using vb6 and MS Access.

 

[Golom]

Use a recordset like

Dim rs As DAO.Recordset
Set rs = db.OpenRecordset( _
   "Select DISTINCT [Company Name] From myTable")
cboCompany.Clear
Do Until rs.EOF
   cboCompany.AddItem rs![Company Name]
   rs.Movenext
Loop
Set rs = Nothing

If the combo is a bound control then use that SQL statement in it's recordsource.

 

[inkfid]

Awesome!! thank you. Feel a little bit stupid now i now all I needed to add was the word distinct!!!