M
Mark Tiffany
Sounds pretty simple but i cant find the answer anywhere.
Thx in advance
Mark
Thx in advance
Mark
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an alternative browser.
You should upgrade or use an alternative browser.
A
Allen Browne
Create a new query.
Change to SQL view.
Paste this:
SELECT MSysObjects.Id, MSysObjects.Name, MSysObjects.DateUpdate,
MSysObjects.DateCreate
FROM MSysObjects
WHERE ((Not ((MSysObjects.Name) Like "MSys*" Or (MSysObjects.Name) Like
"~*")))
ORDER BY MSysObjects.DateUpdate DESC;
Change to SQL view.
Paste this:
SELECT MSysObjects.Id, MSysObjects.Name, MSysObjects.DateUpdate,
MSysObjects.DateCreate
FROM MSysObjects
WHERE ((Not ((MSysObjects.Name) Like "MSys*" Or (MSysObjects.Name) Like
"~*")))
ORDER BY MSysObjects.DateUpdate DESC;
D
Douglas J. Steele
Modified Date is easy: use the FileDateTime function. There's no built-in
way to get the Created Date, though, so you'll have to use the GetFileTime
API:
Randy Birch has an example at
http://www.mvps.org/vbnet/code/fileapi/filedatetime.htm that should port
into Access without any problems.
way to get the Created Date, though, so you'll have to use the GetFileTime
API:
Randy Birch has an example at
http://www.mvps.org/vbnet/code/fileapi/filedatetime.htm that should port
into Access without any problems.
M
Marshall Barton
Mark said:Sounds pretty simple but i cant find the answer anywhere.
The problem is not in finding ways to get an MDB's creation
or modified date, but in what they mean (or don't mean).
Generally an MDB is modified everytime you open it
regardless of what you do (or don't) to it. On top of that
there are several containers with different sets of these
dates. Here is what I think is about the only one that has
significant meaning:
CurrentDb.Containers("Databases").Documents("SummaryInfo").Properties("DateCreated")
If your question was for any file instead of the currently
running database, then you could try:
FileDateTime(path)
D
D. A. Gray
First, add the Scripting Runtime library, scrun.dll, to
the References for your application. Than, add the
following to a VBA module.
Dim fsoRoot As Scripting.FileSystemObject
Dim fsoFile As Scripting.File
Dim dtmCustImportCreated as Date
Dim lngImportFileSize as Long
Set fsoRoot = New Scripting.FileSystemObject
lngImportFileSize = fsoFile.Size
dtmCustImportCreated = fsoFile.DateLastModified
The above code is excerpted from a working application
that I put together last week and have been refining up to
today.
David A. Gray
P6 Consulting
http://www.p6c.com
You are more important than any technology we may employ.
the References for your application. Than, add the
following to a VBA module.
Dim fsoRoot As Scripting.FileSystemObject
Dim fsoFile As Scripting.File
Dim dtmCustImportCreated as Date
Dim lngImportFileSize as Long
Set fsoRoot = New Scripting.FileSystemObject
lngImportFileSize = fsoFile.Size
dtmCustImportCreated = fsoFile.DateLastModified
The above code is excerpted from a working application
that I put together last week and have been refining up to
today.
David A. Gray
P6 Consulting
http://www.p6c.com
You are more important than any technology we may employ.