Results 1 to 1 of 1
  1. #1
    Join Date
    Dec 2005
    Posts
    10

    Question Unanswered: Subform not updating

    I have a customer subform on page 2 of my inspection log. A combo box at the top allows the user to lookup customers based on name. My problem is after I enter a new customer and part number into the database it shows up in my combo box but I cannot get my two underlying subforms to pull up any information on it unless I close out the form and re-open it. here is a copy of my database and the code I am using for my combo box after update event. You would think the “requery” action fro the subforms would allow me to pull new information with out closing and reopening the form.

    Private Sub Combo4_AfterUpdate()
    Me.QuerytblSpecTable_subform.Requery
    Me.QuerytblPartNumbers_subform2.Requery
    ' Find the record that matches the control.
    Dim rs As Object

    Set rs = Me.Recordset.Clone
    rs.FindFirst "[customer] = '" & Me![Combo4] & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
    End Sub

    Sample included
    Attached Files Attached Files

Posting Permissions

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