M
MM
I am trying to pull the LastUpdate property of an object (Forms in this case)
in an Access 2003 database, but every time I do I get the DateCreated data.
The function I wrote worked correctly under Access 2000. Also in if I make a
change to form and save it the Modified date on the database window reflects
the proper Date and time, but the Modified date in the MSysObjects table does
not.
Here is the code I used to check the date. This is opening 2 different
database files and compairing the modified property's of both to see if the
Update database objects are newer. If they are it copies them to the
application database and updates the version information.
Set dbUD = DBEngine.Workspaces(0).OpenDatabase(DbLoc) 'Open the Updated
Database
Set dbC = CurrentDb() 'Open the Current Database
For X = 0 To dbUD.Containers("Forms").Documents.Count - 1
If dbUD.Containers("Forms").Documents(X).LastUpdated >
dbC.Containers("Forms").Documents(dbUD.Containers("Forms").Documents(X).Name).LastUpdated Then
Why is this happening, and what do I need to do to correct it.
in an Access 2003 database, but every time I do I get the DateCreated data.
The function I wrote worked correctly under Access 2000. Also in if I make a
change to form and save it the Modified date on the database window reflects
the proper Date and time, but the Modified date in the MSysObjects table does
not.
Here is the code I used to check the date. This is opening 2 different
database files and compairing the modified property's of both to see if the
Update database objects are newer. If they are it copies them to the
application database and updates the version information.
Set dbUD = DBEngine.Workspaces(0).OpenDatabase(DbLoc) 'Open the Updated
Database
Set dbC = CurrentDb() 'Open the Current Database
For X = 0 To dbUD.Containers("Forms").Documents.Count - 1
If dbUD.Containers("Forms").Documents(X).LastUpdated >
dbC.Containers("Forms").Documents(dbUD.Containers("Forms").Documents(X).Name).LastUpdated Then
Why is this happening, and what do I need to do to correct it.