Combo Box recordset problem

  • Thread starter Thread starter Penstar
  • Start date Start date
P

Penstar

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.
 
Back
Top