Results 1 to 2 of 2
  1. #1
    5 Star Lounger
    Join Date
    Jan 2001
    Location
    Jacksonville,NC, USA
    Posts
    705
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Record Selector Combo box on a form (Access 2000)

    Nevermind...but here is the reason for anyone else who may have the same woes:

    Corrected code:
    ************************************************** *********************
    Option Compare Database
    Dim strSearch As String

    strSearch = "[CompanyName] = '" & Me![cboSelect] & "'"

    Me.RecordsetClone.FindFirst strSearch
    Me.Bookmark = Me.RecordsetClone.Bookmark

    End Sub
    ************************************************** ********************

    NMP
    NMP <img src=/S/cool.gif border=0 alt=cool width=15 height=15>

    If you can't convince them, confuse them. - Harry Truman <img src=/S/scratch.gif border=0 alt=scratch width=25 height=29>

  2. #2
    5 Star Lounger
    Join Date
    Jan 2001
    Location
    Jacksonville,NC, USA
    Posts
    705
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Resolved: RecSelCbo box on a form (Access 2000)

    I am trying to create a Record Selector Combo Box in an Access Form with VBA

    I have attached the DB in zipped format for anyone who would care to take a look for me...I'm not sure why it won't work at this point, the only guess is because of the tabbed control on the form. It seems to work in just a parent child relationship of a main form and a child, but as soon as I try to create a tabbed area with subforms placed on it then it stops working:

    Here is the code I have used so far:


    Code:Option Compare Database
    Dim strSearch As String

    strSearch = "[CompanyName] = '" & Me![cboSelect]

    Me.RecordsetClone.FindFirst strSearch
    Me.Bookmark = Me.RecordsetClone.Bookmark

    End Sub

    Private Sub Form_Current()
    Me.cboSelect = Me.CompanyName
    End Sub




    With the line is

    Me.Bookmark = Me.RecordsetClone.Bookmark

    where the error lands...Error 3077 as error in syntax string.

    The form is frmCustomerOrders.

    Thank you
    Attached Files Attached Files
    NMP <img src=/S/cool.gif border=0 alt=cool width=15 height=15>

    If you can't convince them, confuse them. - Harry Truman <img src=/S/scratch.gif border=0 alt=scratch width=25 height=29>

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •