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 O’Reilly online learning.

O’Reilly members experience live online training, plus books, videos, and digital content from 200+ publishers.