Link to home
Start Free TrialLog in
Avatar of JamesHardiman
JamesHardiman

asked on

Access2002 .ADP "Run-time error 2455" -- "You entered an expression that has an invalid reference to the property Form/Report"

There's an unbound main form: frmDelivery, and an unbound subform: frmdeliveryItems.

The subform has a Public Sub, "ConnectSubform" that does the necessary binding.  The call from the mainform looks like this:

Private Sub ClearFields()
    txtDeliveryID = ""
    txtDeliveryTime = Now()
    cmbEmployee = ""
    cmbSupplier = 0
    Forms![frmDelivery]![frmDeliveryItemsSubform].Form.ConnectSubForm 0
    txtDeliveryTime.SetFocus
End Sub

The name of the subform, and the name of the subform control on the main form are both:
frmDeliveryItemsSubform (name of control)
frmDeliveryItemsSubform (data: source object of control)

The Public routine in the subform looks like this:
Public Sub ConnectSubForm(intDeliveryId As Integer)
    Me.RecordSource = "spDeliveryItemsSubformRecordSource"
    Me.InputParameters = "@DeliveryID=" & intDeliveryId
    intDelivery = intDeliveryId
    Me.Requery
    Me.UniqueTable = "tblPurchaseOrderItems"
    On Error Resume Next
    Me.Recordset.MoveLast
    intItemNo = txtDeliveryItemNo
End Sub

It's this line that causes the error:
Forms![frmDelivery]![frmDeliveryItemsSubform].Form.ConnectSubForm 0

... silly thing is, this has been working for the last 4 years... it only just stopped.  Is it co-incidence that I just upgraded to Access 2002?  The ADP is still in Access 2000 format.

I'm about ready to kill... been bashing my head against the wall for a week over this, so any/all help will be fallen on with whimpering gratitude!
Avatar of Thandava Vallepalli
Thandava Vallepalli
Flag of United States of America image

And this one also,

http://www.utteraccess.com/forums/access/access241952.html

All the best,
V.Thandava Krishna.
Avatar of JamesHardiman
JamesHardiman

ASKER

Thanks for the pointers, V.Thandava Krishna, but I'd already surfed all of these, and they've got nothing to do with the problem.

I'm beginning to think this is an Access 2002 bug (feature?), because there are other "interesting effects" that have crept in since I installed 2002... see my next append (which I'm just about to make!)

James Hardiman
jamesh@sunsail.com
Does the error occurs on this line:

Forms![frmDelivery]![frmDeliveryItemsSubform].Form.ConnectSubForm 0

or is it somewhere in the Sub Procedure (ConnectSubForm). When debugging with F8 (Step Into) does it stop on this line, or goes it into this procedure until line ...?
Answer to wsteegmans ...

It stops on
Forms![frmDelivery]![frmDeliveryItemsSubform].Form.ConnectSubForm 0

and, when stepping on F8, does NOT gointo the ConnectForm routine.

James
ASKER CERTIFIED SOLUTION
Avatar of wsteegmans
wsteegmans

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Hi JamesHardiman,

Please close or delete this question ...
Because it's solved ;-)