Updating after entering a date!

[firsttime]

Hi,

I got an form that's called "Order".It look like this:

--------------------------------------------------
Date:....
--------------------------------------------------
Productname orderunit receveid

Oval table 4 (nothing yet)

Tennis chair 6 (nothing yet)
-----------------------------------------------------

What i want is that when i enter a date in the datebox, all the number in orderunit goes to received.

like this:
--------------------------------------------------
Date: 01-09-02
--------------------------------------------------
Productname orderunit receveid

Oval table 4 4

Tennis chair 6 6
-----------------------------------------------------

Is it possible? ( or instead entering a date, to click on a button to make it change)
Anybody can help me??

THX IN ADVANCE

Dan

 

[KenReay]

Hi

Do you have Main form with a Sub Form for the items, or a single continuos form with the date in the header section?

Regards Ken Reay
Freelance Developer
kenneth.reay@talk21.com

 

[firsttime]

Hi ken,

The 'date' is in the main form and the 'orderunit' and 'received' in subform.

Dan

 

[KenReay]

Hi

OK, in the the after update even of the date control on the main form put code like this (Note this is not tested and you need to sustitute your control names):

Dim Rs As Recordset
Set Rs = Me.SubFormControl.FORM.REcordsetClone
With Rs
Do Until .EOF
.Edit
!DateColumn = Me.DateControl
.Update
.MoveNext
Loop
End With
Me.SubFormControl.Requery

Regards
Ken Reay
Freelance Developer
kenneth.reay@talk21.com