How to date an MDE

[Emilio]

Hi,

I would like to keep track of the versions of my database
by adding say a date (only when saving as MDE)
(if possible: "V.1.011804" for todat's date 01/18/04)
to make it easy to update and compare the rest of the
computers, since I am continously making changes at the
moment.
Is there any way to do this? avoiding the date changing
every time the MDE is opened.

Thanks for any help,
Emilio

 

[Paul Overway]

Set a property within the database, i.e.,

On error resume next

Set db = Currentdb()

db.properties("MDEVersion") = 1

If Err.number <> 0 Then
db.Properties.Append db.CreateProperty("MDEVersion",dbText,1)
End if

 

[Emilio]

Thanks Paul,

I forgot to mention that I am a newbie and don't quite
understand your example.
I do not see mention of date at all.

Thanks for your help anyway,
Emilio

 

[Paul Overway]

OK...use Date() instead of 1. Read help concerning te use of properties.