combo box problems

[tina hayes]

Hi there I am a bit stuck

I have a combo box that is bound to my main box table, which in turn is connect to the main form query. in there I will have a number of barcodes, I would like to be able to get a list of the barcodes on the drop down menu .
What I have done so far is that I have the row source type set to table/query and this syntax in the
Row source
SELECT DISTINCTROW [Main Form Query].[ Barcode1], ORDER BY [Main Form Query]. Barcode1;

In the event properties on after update I have the following code
Private Sub Barcode1_AfterUpdate()
' Find the record that matches the control.
Me.RecordsetClone.FindFirst "[Box Ref] = " & Me![Ref]
Me.Bookmark = Me.RecordsetClone.Bookmark

End Sub

But It doesn’t work, I hope I have explained this well enough
Please help

 

[namliam]

dim rst as dao.recordset
set rst = me.recordsetclone
rst.findfirst ...
me.bookmark = rst.bookmark
set rst = nothing

Greetz