Tamaño de la BD desde una aplicación

Me gustaría saber si hay alguna forma de obtener las características y estructura de una base de datos Access desde una aplicación Visual Basic 6.0. ¿Es posible obtener el tamaño de la base de datos desde una aplicación?

Efectivamente existe la manera de hacer referencia a los objetos de una base de datos de forma genérica, y así obtener la información más interesante.

A continuación le mostramos un fragmento de código que permite obtener algunas características de una base de datos.
Private Sub Command1_Click()
For i = 0 To Data1.Database.TableDefs.Count 'nombre de cada una de las tablas
List1.AddItem Data1.Database.TableDefs(i).Name 'numero de campos de la tabla
i List1.AddItem Data1.Database.TableDefs(i).Fields.Count 'numero de Registros
List1.AddItem Data1.Database.TableDefs(i).RecordCount 'ultima actualizacion
List1.AddItem Data1.Database.TableDefs(i).LastUpdated 'así podrá obtener toda la información que necesite Next
End Sub

En cuanto al tamaño del fichero mdb puede utilizar la función Len( ) que le permite obtener el número de bytes necesarios para almacenar cualquier fichero, de tal manera que si conocemos el espacio necesario para su almacenamiento podremos obtener tamaño real de dicho fichero.

Como ejemplo adjuntamos otro pequeño fragmento de código que ilustra a la perfección lo que explicábamos en estas líneas.

Dim Tamaño As String Tamaño = InputBox("Nombre del fichero:", "Mostrar tamaño", "C:\Base.mdb")
If Len(Tamaño) Then MsgBox "El tamaño de " & Tamaño & vbCrLf & "es de " & FileLen(Tamaño) & " bytes" End If

Ignacio Céspedes Orduña