- Local time
- Today, 12:35
- Joined
- Sep 12, 2006
- Messages
- 15,614
it's easy enough to look up the size of a backend.
This sort of thing will give you the name of the backend, and its size in Mb, and the name and size of your front end
Edit. I didn't realise this had apparently been resolved satisfactorily already.
This sort of thing will give you the name of the backend, and its size in Mb, and the name and size of your front end
Code:
Sub DBS_sizes()
Dim db As Database
Dim tdf As TableDef
Dim fname As String
Dim fname2 As String
Dim fsize As Long
Dim fsize2 As Long
Set db = CurrentDb
Set tdf = db.TableDefs("known linked table")
fname = Mid(tdf.Connect, 11)
fname2 = CurrentProject.fullName
fsize = FileLen(fname)
fsize2 = FileLen(fname2)
MsgBox "Back End: " & fname & vbCrLf & _
"Size: " & Fix(fsize / 1024 / 1024) & "Mb" & vbCrLf & vbCrLf & _
"Front End: " & fname2 & vbCrLf & _
"Size: " & Fix(fsize2 / 1024 / 1024) & "Mb"
End Sub
Edit. I didn't realise this had apparently been resolved satisfactorily already.
Last edited: