Bueno, pues rebuscando y rebuscando encontré lo que quería. Aquí pongo el código que bien podría ir a la FAQ, jejeje. Un saludo.
Código PHP:
Private Sub Command4_Click()
Dim unid2 As String, ruta2 As String
Dim a As Byte
On Error GoTo err
unid2 = InputBox("Letra de la unidad. Introducir solo la letra, sin los dos puntos (:) ni la barra (\)")
ruta2 = unid2 + ":\base.mdb"
Dim DB As DAO.Database
Dim T As DAO.TableDef
Set DB = OpenDatabase(ruta2)
Set T = DB.TableDefs("Tabla1")
a = MsgBox(T.LastUpdated)
GoTo fin:
err:
MsgBox "No se puede acceder a la tabla, error: " + err.Description + ""
fin:
Set DB = Nothing
Set T = Nothing
End Sub