Help with Time()

[Paul]

I have a form that is bound on a table. The form has a text box that
has
=Time() and an Add button. How can I update the time or make it the
current time before adding a record on the table via the form? I tried
putting Time() on the Add event's code before the "DoCmd.GoToRecord ,
, acNewRec" line but, it still doesn't pick up the current time. It
only updated the text box after the record has been added.

I tried using the Form's "On Timer" & "Time Interval" properties, the
text box gets updated in real time but, it won't work for me because
everytime I n=navigate through the records on the form (back &
forward) the time on the table changes to the current real time. Also,
I have an "Update" button. When I go back to a particular record, to
update it, the "Update" button picks up the real time on the text box.

Sp I figured the best thing for me is to not set the "On Timer" &
"Time Interval" properties. Instead, simply update the time text box
automatically before I add a record. Also can I make it so that the
original time remains the same on an update. Any ideas will be
appreciated. Thank you in advance.

Paul

[Allen Browne]

Are you just trying to show the time on the form?
Or do you want to record the time in a field in your table?

If you wish to record the time, use the BeforeUpdate event procedure of the
form:

Private Sub Form_BeforeUpdate(Cancel As Integer)
Me.[NameOfYourTimeFieldHere] = Time()
End Sub

If you want the date and time, use = Now()

--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

"Paul" <pc*******@yahoo.com> wrote in message
news:78*************************@posting.google.co m...

I have a form that is bound on a table. The form has a text box that
has
=Time() and an Add button. How can I update the time or make it the
current time before adding a record on the table via the form? I tried
putting Time() on the Add event's code before the "DoCmd.GoToRecord ,
, acNewRec" line but, it still doesn't pick up the current time. It
only updated the text box after the record has been added.

I tried using the Form's "On Timer" & "Time Interval" properties, the
text box gets updated in real time but, it won't work for me because
everytime I n=navigate through the records on the form (back &
forward) the time on the table changes to the current real time. Also,
I have an "Update" button. When I go back to a particular record, to
update it, the "Update" button picks up the real time on the text box.

Sp I figured the best thing for me is to not set the "On Timer" &
"Time Interval" properties. Instead, simply update the time text box
automatically before I add a record. Also can I make it so that the
original time remains the same on an update. Any ideas will be
appreciated. Thank you in advance.

Paul

[Reggie]

Also, to keep the original time during an update, change Allen's code to
something like:
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[NameOfYourTimeFieldHere]) Then
Me.[NameOfYourTimeFieldHere] = Time()
End If
End Sub
--
-----------
Reggie
"Allen Browne" <Al*********@SeeSig.Invalid> wrote in message
news:41***********************@per-qv1-newsreader-01.iinet.net.au...

Are you just trying to show the time on the form?
Or do you want to record the time in a field in your table?

If you wish to record the time, use the BeforeUpdate event procedure of
the form:

Private Sub Form_BeforeUpdate(Cancel As Integer)
Me.[NameOfYourTimeFieldHere] = Time()
End Sub

If you want the date and time, use = Now()

--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

"Paul" <pc*******@yahoo.com> wrote in message
news:78*************************@posting.google.co m...

I have a form that is bound on a table. The form has a text box that
has
=Time() and an Add button. How can I update the time or make it the
current time before adding a record on the table via the form? I tried
putting Time() on the Add event's code before the "DoCmd.GoToRecord ,
, acNewRec" line but, it still doesn't pick up the current time. It
only updated the text box after the record has been added.

I tried using the Form's "On Timer" & "Time Interval" properties, the
text box gets updated in real time but, it won't work for me because
everytime I n=navigate through the records on the form (back &
forward) the time on the table changes to the current real time. Also,
I have an "Update" button. When I go back to a particular record, to
update it, the "Update" button picks up the real time on the text box.

Sp I figured the best thing for me is to not set the "On Timer" &
"Time Interval" properties. Instead, simply update the time text box
automatically before I add a record. Also can I make it so that the
original time remains the same on an update. Any ideas will be
appreciated. Thank you in advance.

Paul

[Paul]

Thanks for the post. I tried the code but, it still doesn't work. It
did solve the problem where the time changes when I do updates.
However, it still not picking up the current time when I "Add".

The text box has a default value of =Time(). Before I click the "Add"
button, I want to pick the current time and record it on the record
source. Any other suggestions?

"Reggie" <NoSpam_chief123101@NoSpam_yahoo.com> wrote in message news:<6b********************@comcast.com>...

Also, to keep the original time during an update, change Allen's code to
something like:
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(Me.[NameOfYourTimeFieldHere]) Then
Me.[NameOfYourTimeFieldHere] = Time()
End If
End Sub
--
-----------
Reggie
"Allen Browne" <Al*********@SeeSig.Invalid> wrote in message
news:41***********************@per-qv1-newsreader-01.iinet.net.au...

Are you just trying to show the time on the form?
Or do you want to record the time in a field in your table?

If you wish to record the time, use the BeforeUpdate event procedure of
the form:

Private Sub Form_BeforeUpdate(Cancel As Integer)
Me.[NameOfYourTimeFieldHere] = Time()
End Sub

If you want the date and time, use = Now()

--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

"Paul" <pc*******@yahoo.com> wrote in message
news:78*************************@posting.google.co m...

I have a form that is bound on a table. The form has a text box that
has
=Time() and an Add button. How can I update the time or make it the
current time before adding a record on the table via the form? I tried
putting Time() on the Add event's code before the "DoCmd.GoToRecord ,
, acNewRec" line but, it still doesn't pick up the current time. It
only updated the text box after the record has been added.

I tried using the Form's "On Timer" & "Time Interval" properties, the
text box gets updated in real time but, it won't work for me because
everytime I n=navigate through the records on the form (back &
forward) the time on the table changes to the current real time. Also,
I have an "Update" button. When I go back to a particular record, to
update it, the "Update" button picks up the real time on the text box.

Sp I figured the best thing for me is to not set the "On Timer" &
"Time Interval" properties. Instead, simply update the time text box
automatically before I add a record. Also can I make it so that the
original time remains the same on an update. Any ideas will be
appreciated. Thank you in advance.

Paul

[Paul]

I think I found a solution. I unbounded the [Time] text box on the
form. I set the "On Timer" & "Time Interval" back on this [Time] text
box so that it displays the real time on the form. I then set the
=Time() directly on the table under the default value (table design).
It worked like a charm.

If anybody still have another solution by making the changes on the
form, I'm still open for other suggestions.

Thanks for solving the my "update" problem part.