Combo Box recordset problem



I have a form and its recordset is an ADODB recordset (I call it through a
stored procedure in mySQL)

I am trying to put a combo box on my form to select a members name and go to
that particular record.

Question Part A: I am unsure what to put in the combo's Row Source Type and
Row Source properties.

Question Part B: I don't know what to put in the VB After Update event.
Testing (using an access table as rowsource)
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[members_membid] = " & Str(Nz(Me![Combo0], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
The VB doesent like the "rs.FindFirst" saying Runtime error 348 Object
doesn't support this property or method.

Any help would be appreciated.


Try declaring rs as a recordset instead of an object and see if that works.
Dim rs As ADODB.Recordset


If you are using an SQL backend, the best way to create a row source for a
combo box is to create an SQL View with the data you want for the combo and
make that view the row source of the combo. It provides the best performance.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads