Subform requery endless loop?

  • Thread starter Thread starter Jerry
  • Start date Start date
J

Jerry

I don't know if this is the right group for this - but I have a Customer
Orders form on which is contained info for each customer in the Customers
table. This form also contains a subform for Orders which lists all orders
for the current Customer on the main form, a second subform for Order
Details listing each item associated with each Order in the Orders subform,
and a third subform showing results of a crosstab query that shows available
inventory. In the Current event of the Orders subform I have this;

Sub Form_Current()

Dim ParentDocName As String

On Error Resume Next
ParentDocName = Me.Parent.Name

If Err <> 0 Then
GoTo Form_Current_Exit
Else
On Error GoTo Form_Current_Err
Me.Parent![Order Details Subform].Requery
End If

Form_Current_Exit:
Exit Sub

Form_Current_Err:
MsgBox Error$
Resume Form_Current_Exit

End Sub

so that when I click on any of the orders in the Orders subform, the Order
Details subform is updated with the information associated with that order.
This works very well until I try to delete a record in the Orders subform,
at which point it locks up. I've tried deleting everything in the Current
event handler except the line that says

Me.Parent![Order Details Subform].Requery

and that appears to be where the problem is. Any one know why or how to fix
it?

Thanks,

Jerry
 
Requerying a form causes the form to pull in the data again, thus, the
Current event fires each time you requery. Thus, if you requery a form on
the Current event it will just keep firing over and over. Try putting your
code in the Before Update event of the form or in some other event.
 
Back
Top