Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

find the size of this .mdb, using vba

Status
Not open for further replies.

OhioSteve

MIS
Mar 12, 2002
1,352
US
How do determine the size of the current .mdb or .mde? I have tried "currentproject.properties...". That does not seem to work.
 
I figured it out!

Dim mySize As Long
mySize = FileLen(CurrentProject.FullName)

mySize is the size in bytes.
 
This is a way you could do it

Code:
Dim fso As FileSystemObject
Dim fil As File
Dim strFileName As String
Dim lngFileSize As Long

strFileName = Me.Application.CodeProject.FullName

Set fso = New FileSystemObject
Set fil = fso.GetFile(strFileName)

lngFileSize = fil.Size
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top