Determine Active DB and Non-active DB

  • Thread starter Thread starter Jeannette
  • Start date Start date
J

Jeannette

Hi!

There are tons of Access databases in a network. I am
trying to figure out an automated way to determine which
of the databases is still actively used or has become
obsolete. How can I tell whether a database is still
currently used by users or has become obsolete in a
network?

I'd greatly appreciate it if you could provide me some
ideas or suggestions.

Sincerely,
Jeannette
 
Jeannette,

You would need to write some software, using Access, VB or other, to
determine when each database was last accessed. This may not tell you
whether they are redundant, but it will at least give you something to work
on. The following code will help you get that information:

'Add a reference to the Microsoft Access Object library
Dim acc As Access.Application
Dim db As Database
Dim sDBPath As String

sDBPath = "C:\Documents and Settings\grahams\My Documents\db1.mdb"

'Create new instance of Access
Set acc = New Access.Application

'Open the database
acc.OpenCurrentDatabase sDBPath
Set db = acc.CurrentDb

Debug.Print
db.Containers("Databases").Documents("SummaryInfo").Properties("LastUpdated"
)

acc.CloseCurrentDatabase
Set db = Nothing
acc.Quit acQuitSaveNone
Set acc = Nothing

Keep in mind that you might have a bunch of databases created in a variety
of versions, so you might need a way of determining which version they are.
I'm afraid I don't know how to do that, so you might want to check out
Stephen Lebans' site (www.lebans.com) - he has loads of really cool stuff
like that.

Regards,
Graham R Seach
Microsoft Access MVP
Sydney, Australia
 
Jeannette said:
There are tons of Access databases in a network. I am
trying to figure out an automated way to determine which
of the databases is still actively used or has become
obsolete. How can I tell whether a database is still
currently used by users or has become obsolete in a
network?
Click to expand...

Every time you go into a mdb Access updates the date/time of the MDB
even though you may not actually do anything.

Tony
--
Tony Toews, Microsoft Access MVP
Please respond only in the newsgroups so that others can
read the entire thread of messages.
Microsoft Access Links, Hints, Tips & Accounting Systems at
http://www.granite.ab.ca/accsmstr.htm
 
Back
Top