2 small Questions

[Guest]

How do you put more than one code in an event
Ie.
on current
=LockBoundControls([Form],True)
=AutoFillNewRecord(Forms!OrdersWDetails)

----------
2nd question:

How do I update the parent (Orders) lastedited field when I save the changes
in the child OrderDetails.

me.lastedited = Now

works for the Orders but not for the child...

Thanks!

 

[Graham Mandeno]

Answer 1:
You create an event procedure for your event and call the functions from
there:

Private Sub Form_Current()
Call LockBoundControls( Me, True )
Call AutoFillNewRecord( Forms!OrdersWDetails )
End Sub

Answer 2:
Assuming OrderDetails is bound to a subform on your Orders form:

Me.Parent!LastEdited = Now

The Parent property of a subform is a reference to the form which contains
that subform.

 

[John Vinson]

How do you put more than one code in an event
Ie.
on current
=LockBoundControls([Form],True)
=AutoFillNewRecord(Forms!OrdersWDetails)

The event should show [Event Procedure], and you should edit the VBA
code to

Private Sub <whatever the event name might be>()
Call LockBoundControls(Me, True)
Call AutoFillNewRecord(Forms!OrderWDetails)
End Sub

----------
2nd question:

How do I update the parent (Orders) lastedited field when I save the changes
in the child OrderDetails.

me.lastedited = Now

works for the Orders but not for the child...

Use the AfterUpdate event on the subform and use

Parent!lastedited = Now

John W. Vinson[MVP]

 

[Guest]

THANKS A BUNCH!

How do you put more than one code in an event
Ie.
on current
=LockBoundControls([Form],True)
=AutoFillNewRecord(Forms!OrdersWDetails)

The event should show [Event Procedure], and you should edit the VBA
code to

Private Sub <whatever the event name might be>()
Call LockBoundControls(Me, True)
Call AutoFillNewRecord(Forms!OrderWDetails)
End Sub

----------
2nd question:

How do I update the parent (Orders) lastedited field when I save the changes
in the child OrderDetails.

me.lastedited = Now

works for the Orders but not for the child...

Use the AfterUpdate event on the subform and use

Parent!lastedited = Now

John W. Vinson[MVP]