R6.31 Wichtige Datenbankeigenschaften ermitteln

Aufgabe

Haben Sie es mit unbekannten Datenbanken zu tun, stehen Sie zunächst vor dem Problem, die Grundstruktur der Datenbank zu analysieren, angefangen bei den Tabellen über die Abfragen bis hin zu speziellen Eigenschaften.

Lösung

Ihr wichtigster Verbündeter ist in diesem Fall ADO bzw. ADOX. Alle relevanten Datenbank-Eigenschaften können Sie, wie vielleicht schon vermutet, über die Properties-Collection eines Connection-Objekts abfragen.

Quelltext ADO

Anzeige aller Eigenschaften sowie deren Werte:

Sub Wichtige_Datenbank_Eigenschaften_ermitteln()
Dim prop As ADOX.Property

  For Each prop In Application.CurrentProject.Connection.Properties
    Debug.Print prop.name & ": " & CStr(prop.value)
  Next
End Sub

Test ADO ...

Get Microsoft Access Programmierrezepte now with the O’Reilly learning platform.

O’Reilly members experience books, live events, courses curated by job role, and more from O’Reilly and nearly 200 top publishers.

Start your free trial