VB code to fill date and time in table row

A)
I have a button on my form. By a push, I want to fill present date and
time in the two rows of the table.

Form Name: Company
Table Name: Company
consists Company ID as primary key, and other company related info,
name, phone number, and Date and Time (all separate rows)

B)
WHen I push again, or I access the same record on my form again, and
activate the button, it replaces the ols Date and old Time with the new
ones, so, it overwrites.

What is the VB code for A and B?
I guess must be placed in "On Click".

Bart
Access 2003

re: VB code to fill date and time in table row

"AA Arens" <bartvandongen@gmail.com> wrote in message
news:1150212521.025307.87400@p79g2000cwp.googlegro ups.com...[color=blue]
> A)
> I have a button on my form. By a push, I want to fill present date and
> time in the two rows of the table.
>
> Form Name: Company
> Table Name: Company
> consists Company ID as primary key, and other company related info,
> name, phone number, and Date and Time (all separate rows)
>
> B)
> WHen I push again, or I access the same record on my form again, and
> activate the button, it replaces the ols Date and old Time with the new
> ones, so, it overwrites.
>
> What is the VB code for A and B?
> I guess must be placed in "On Click".
>
> Bart
> Access 2003
>[/color]

First off, don't use "Date" or "Time" for field names as they're reserved
words in Access. For my example I've assumed control names are "txtDate"
and "txtTime" bound to your date and time fields.

Create a command button and out this in its on click event:

Me.txtDate = Date
Me.txtTime = Time()
Me.Refresh

HTH - Keith.
www.keithwilby.com

re: VB code to fill date and time in table row

"AA Arens" <bartvandongen@gmail.com> schreef in bericht news:1150212521.025307.87400@p79g2000cwp.googlegro ups.com...[color=blue]
> A)
> I have a button on my form. By a push, I want to fill present date and
> time in the two rows of the table.
>
> Form Name: Company
> Table Name: Company
> consists Company ID as primary key, and other company related info,
> name, phone number, and Date and Time (all separate rows)
>
> B)
> WHen I push again, or I access the same record on my form again, and
> activate the button, it replaces the ols Date and old Time with the new
> ones, so, it overwrites.
>
> What is the VB code for A and B?
> I guess must be placed in "On Click".
>
> Bart
> Access 2003[/color]

Look at the answer that Keith gave you for the solution, but ...
-- what do you want to achieve?
-- why recording the date and time?
If you want the date and time recorded when the record has changed you simply use the forms' afterupdate-event.
If you want the date and time recorded when the record is viewed you simply use the forms' oncurrent-event.
(Same code as Keith gave you)
No need to click any button maybe...
But you may have your reasons to use a button...

Arno R

re: VB code to fill date and time in table row

"Arno R" <arraNOcomSPAM@tiscali.nl> wrote in
news:448ee86b$0$2013$ba620dc5@text.nova.planet.nl:
[color=blue]
> If you want the date and time recorded when the record has
> changed you simply use the forms' afterupdate-event.[/color]

Use the ***BeforeUpdate*** event, not AfterUpdate.

--
Bob Quintal

PA is y I've altered my email address.

--
Posted via a free Usenet account from http://www.teranews.com

re: VB code to fill date and time in table row

It works, it must be Me! instead of Me.

The reason why I wanted the descried question, is:

I do have a Note (memoblock) on my form and every time there is any
progression/ modification, we have to push on the date-insert button,
which insert "(date) ----" at the end of the memo block xontents,
before we fill in some text.
Together with the date insert action, I added date and time for the
combo-box. Now the most recent modifed records are on top of the list
since I order by date and time. Without the insert date in the memo
block, the record is not considered modified.
See the discission on
http://groups.google.com/group/comp....8340fa64437ede


Thanks to all.

Bart

Bob Quintal wrote:[color=blue]
> "Arno R" <arraNOcomSPAM@tiscali.nl> wrote in
> news:448ee86b$0$2013$ba620dc5@text.nova.planet.nl:
>[color=green]
> > If you want the date and time recorded when the record has
> > changed you simply use the forms' afterupdate-event.[/color]
>
> Use the ***BeforeUpdate*** event, not AfterUpdate.
>
> --
> Bob Quintal
>
> PA is y I've altered my email address.
>
> --
> Posted via a free Usenet account from http://www.teranews.com[/color]

re: VB code to fill date and time in table row

"Bob Quintal" <rquintal@sPAmpatico.ca> schreef in bericht news:Xns97E1AD9098A4CBQuintal@66.150.105.47...[color=blue]
> "Arno R" <arraNOcomSPAM@tiscali.nl> wrote in
> news:448ee86b$0$2013$ba620dc5@text.nova.planet.nl:
> [color=green]
>> If you want the date and time recorded when the record has
>> changed you simply use the forms' afterupdate-event.[/color]
>
> Use the ***BeforeUpdate*** event, not AfterUpdate.
> [/color]

Yep, you are right Bob. Sorry for the mistake.

Arno R

re: VB code to fill date and time in table row

"AA Arens" <bartvandongen@gmail.com> wrote in message
news:1150299132.259607.26070@f6g2000cwb.googlegrou ps.com...[color=blue]
> It works, it must be Me! instead of Me.
>[/color]

"Me." will work if you're referencing a text box name. What error message
do you get?

re: VB code to fill date and time in table row

Comile Error: Method or data member not found

Bart

Keith Wilby wrote:[color=blue]
> "AA Arens" <bartvandongen@gmail.com> wrote in message
> news:1150299132.259607.26070@f6g2000cwb.googlegrou ps.com...[color=green]
> > It works, it must be Me! instead of Me.
> >[/color]
>
> "Me." will work if you're referencing a text box name. What error message
> do you get?[/color]

re: VB code to fill date and time in table row

If I use

Me.txtDate = Date
Me.txtTime = Time()
Me.Refresh

In BeforeUpdate, the Refreh command is fault.
Beside that, the record is not considered modifed when I type some text
in the Notes. There is not add of date and time, when the Refresh is
disabled (').

Let's look at this:
When I approach a record, is it possible to have it considered modified
(date and time added) when I view-only the record a minimum of seconds?
Because I want to have also a recently modifed record when I only
approach it (to look for the contents). But a minimum of x seconds,
otherwise all records will be considered modifed when I navigate though
the records!


Bart



Arno R wrote:[color=blue]
> "Bob Quintal" <rquintal@sPAmpatico.ca> schreef in bericht news:Xns97E1AD9098A4CBQuintal@66.150.105.47...[color=green]
> > "Arno R" <arraNOcomSPAM@tiscali.nl> wrote in
> > news:448ee86b$0$2013$ba620dc5@text.nova.planet.nl:
> >[color=darkred]
> >> If you want the date and time recorded when the record has
> >> changed you simply use the forms' afterupdate-event.[/color]
> >
> > Use the ***BeforeUpdate*** event, not AfterUpdate.
> >[/color]
>
> Yep, you are right Bob. Sorry for the mistake.
>
> Arno R[/color]

re: VB code to fill date and time in table row

If you take off the Me.Refresh your code will probably work. You shouldn't
rely on some number of seconds before counting whether a record is edited or
not.

When you're in the middle of a data writing sequence, as you are when you
fire off BeforeUpdate, don't attempt form- or recordset- level operations.
You are bumping into the write sequence.