469,933 Members | 2,015 Online
Bytes | Developer Community
New Post

Home Posts Topics Members FAQ

Post your question to a community of 469,933 developers. It's quick & easy.

Automated entries in form

I have a table named CASES based used to store data for a small
insurance company used to keep track of all the different forms used
for a specific client.
Some field refers to a different forms and are named with the form
name (ex. A, B, C, etc.). Each form requires a Date Received field and
a Date Cleared field. The fields wich are used for these entries are
simply named ARECD, ACLD, BRECD, BCLD, CRECD, CCLD, etc.)

I was wandering if it is possible to store an automated date (should
be the current date) in the Date Fields, when selecting a form.

FOr example, after that I type a form (it is done through a cbo), I
would like that in the associated Date field, the current date in
automatically entered.

Thanks.
Nov 13 '05 #1
2 1070

Try this:
Selecting time-stamped dates
the Now() function is quite handy because it stamps a very
precise date and time into the time-stamped field. However, at some
point you may want to go back and summarize or select by dates. For
example, the Customers table has a time-stamp that records when each
record is added to the table. The code required for this follows as
part of the form's BeforeInsert event.

Private Sub Form_BeforeInsert(Cancel As Interger)
Me.RecordCreated = Now
End Sub


*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!
Nov 13 '05 #2

Try this:
Selecting time-stamped dates
the Now() function is quite handy because it stamps a very
precise date and time into the time-stamped field. However, at some
point you may want to go back and summarize or select by dates. For
example, the Customers table has a time-stamp that records when each
record is added to the table. The code required for this follows as
part of the form's BeforeInsert event.

Private Sub Form_BeforeInsert(Cancel As Interger)
Me.RecordCreated = Now
End Sub
http://www.rogersaccesslibrary.com/

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!
Nov 13 '05 #3

This discussion thread is closed

Replies have been disabled for this discussion.

Similar topics

21 posts views Thread by Stefan Richter | last post: by
2 posts views Thread by Stephen Poley | last post: by
5 posts views Thread by Salad | last post: by
6 posts views Thread by brettev | last post: by
reply views Thread by existatus | last post: by
1 post views Thread by rn5arn5a | last post: by
By using this site, you agree to our Privacy Policy and Terms of Use.