expiration Date

[bacardi451]

Hello
I have a database that keeps record of test taken that are valid for 6 months. I have to fields one is the date tested and the other is expiration date. I would like to have the access automaticly put an expiration date for 6 months from current date.
Example
date tested - 02-Nov-02
expiration 02-May-02

Is there a way to do this? the form is done through the table vice queries.

Thanks in advance
Al

 

[Newman]

First thing (just to be sure), do not put the Expiration field in a table, as calculated fields can cause damage in tables.
For the reports and forms, use this:
DateAdd("m",6,"[DateTested]")
Meaning: Add 6 to the months ("m") of the field "[DateTested]"
You can also replace the "m" with one of these:
"d" for days
"ww" for weeks
"yy" for years

Newman

 

[3699wat]

Works for me with
=DateAdd("m",6,[DateTested])

 

[bacardi451]

I cant get it to work. where should i put the code?

Thanks in advance
Al

 

[3699wat]

In the Control Source of your textbox you want to display the date with on your form.
Type
=DateAdd("m",6,[DateTested])

 

[bacardi451]

Thank you very much. That work like a charm.

Al