M
Michael Lam
Hi All
I have designed a table which contain two date date columns and time columns
and two forms
All the date and time columns are contained in the same table.
Different portion of date ,time colums are accessed by two form (Request
Form and MIS Form)
Request Form is already automatically filled in time and date by define the
default value = Now()
and assigned autogen Ref No when create
The MIS Form will retrieve the record by Ref No
after create the event other suggested
"You'll need to use a line of VBA code in the Form's BeforeUpdate event
procedure, something like this:
Me.ViewDate.Value = Now() "
The MIS date , time portion of MIS form will be
filled in automatically
After I create several records, I try to retrieve the records in MIS form
and update it
The time record dont change
Any idea?
I have try to define those field not link to the table and default
value = Now()
So that the time and date shown on the MIS form will be exact the time
as computer clock
and create the follow event after update
Private Sub Date_AfterUpdate()
Dim rs As Object
rs = Me.Date.Value
rs = Now()
End Sub
It also dont work
any idea
I have designed a table which contain two date date columns and time columns
and two forms
All the date and time columns are contained in the same table.
Different portion of date ,time colums are accessed by two form (Request
Form and MIS Form)
Request Form is already automatically filled in time and date by define the
default value = Now()
and assigned autogen Ref No when create
The MIS Form will retrieve the record by Ref No
after create the event other suggested
"You'll need to use a line of VBA code in the Form's BeforeUpdate event
procedure, something like this:
Me.ViewDate.Value = Now() "
The MIS date , time portion of MIS form will be
filled in automatically
After I create several records, I try to retrieve the records in MIS form
and update it
The time record dont change
Any idea?
I have try to define those field not link to the table and default
value = Now()
So that the time and date shown on the MIS form will be exact the time
as computer clock
and create the follow event after update
Private Sub Date_AfterUpdate()
Dim rs As Object
rs = Me.Date.Value
rs = Now()
End Sub
It also dont work
any idea