{"id":55000725,"date":"2010-06-01T00:00:00","date_gmt":"2020-05-22T22:13:28","guid":{"rendered":"http:\/\/access-im-unternehmen.aix-dev.de\/aiu\/?p=725"},"modified":"-0001-11-30T00:00:00","modified_gmt":"-0001-11-30T00:00:00","slug":"Optionen_in_Properties_speichern","status":"publish","type":"post","link":"https:\/\/access-im-unternehmen.de\/Optionen_in_Properties_speichern\/","title":{"rendered":"Optionen in Properties speichern"},"content":{"rendered":"

\"\"<\/p>\n

Es gibt verschiene Ansätze, Anwendungsoptionen zu speichern, also zum Beispiel Standardverzeichnisse, den aktuellen Benutzer et cetera. Da wären eine eigene Optionentabelle, die Windows-Registry oder auch einfach eine Text- oder XML-Datei. Eine ganz großartige Möglichkeit wird gern übersehen: das Speichern von Optionen in den Datenbankeigenschaften. Dieser Beitrag zeigt, wie Sie Anwendungsoptionen an verschiedenen Stellen innerhalb der Access-Datenbank speichern können.<\/b><\/p>\n

Wenn Sie an Access-Eigenschaften denken, fällt Ihnen vermutlich zunächst der Eigenschaften-Dialog ein, den Sie unter Access 2003 und älter mit dem Menüeintrag Datei|Datenbankeigenschaften und unter Access 2007 mit dem Office-Menü-Befehl Verwalten|Datenbankeigenschaften <\/b>anzeigen können (siehe Bild 1).<\/p>\n

\"pic001.png\"<\/p>\n

Bild 1: Der Eigenschaften-Dialog einer Access-Anwendung<\/span><\/b><\/p>\n

Dort befinden sich einige Informationen, die auf verschiedene Register aufgeteilt wurden. Sie können die meisten Eigenschaften durch simples Überschreiben ändern. Möglicherweise finden Sie in den vorhandenen Eigenschaften bereits eine, die Ihren Anforderungen entspricht. Falls nicht, wechseln Sie einfach zum letzten Registerreiter Anpassen<\/b> (siehe Bild 2).<\/p>\n

\"pic002.png\"<\/p>\n

Bild 2: Anlegen benutzerdefinierter Eigenschaften<\/span><\/b><\/p>\n

Hier können Sie auch individuelle Eigenschaften anlegen. Dazu schreiben Sie den Namen der Eigenschaft in das obere Textfeld, wählen den Datentyp aus und tragen den Wert der Eigenschaft ein. Nach einem Klick auf Hinzufügen erscheint die neue Eigenschaft in der Liste der benutzerdefinierten Eigenschaften.<\/p>\n

Datenbankeigenschaften per VBA lesen<\/b><\/p>\n

Natürlich sollen Optionen wie der aktuelle Benutzer oder dergleichen nicht von Hand in einem Eigenschaften-Dialog gespeichert werden, sondern etwa beim Schließen der Anwendung per VBA – und gleich beim Öffnen lesen wir diesen Wert wieder aus.<\/p>\n

Beginnen wir mit dem Lesen der bereits vorhandenen Datenbankeigenschaften, also der Eigenschaften, die Sie auf den ersten vier Registerseiten finden. Dies erledigt die folgende Prozedur:<\/p>\n

Public Sub Datenbankeigenschaften()\r\n    Dim prp As DAO.Property\r\n    Dim db As DAO.Database\r\n    Dim con As DAO.Container\r\n    Dim doc As DAO.Document\r\n    Set db = CurrentDb\r\n    Set con = db.Containers("Databases")\r\n    Set doc = con.Documents("SummaryInfo")\r\n    For Each prp In doc.Properties\r\n        Debug.Print " " & prp.Name, prp.Value\r\n    Next prp\r\n    Set doc = Nothing\r\n    Set con = Nothing\r\n    Set db = Nothing\r\nEnd Sub<\/pre>\n
Das Ergebnis sieht bei einer frischen Access 2007-Datenbank so aus. Die letzten drei Einträge enthalten die änderbaren und standardmäßig ausgefüllten Eigenschaften des Eigenschaftenfensters, die übrigen finden Sie auf den übrigen Seiten:<\/p>\n
Name SummaryInfo\r\nOwner admin\r\nUserName admin\r\nPermissions 0\r\nAllPermissions 65536\r\nContainer Databases\r\nDateCreated 09.03.2010 10:25:55\r\nLastUpdated 09.03.2010 10:25:55\r\nTitle AccessProperties\r\nAuthor Andre Minhorst\r\nCompany mossSOFT<\/pre>\n
Die noch nicht ausgefüllten Eigenschaften der Registerseite aus Bild 1 werden erst nach dem Eintragen von Werten in der Properties<\/b>-Auflistung angelegt.<\/p>\n
Ausflug in die Welt der Containers und Documents<\/b><\/p>\n
In der obigen Prozedur gibt es einige Objekttypen, die dem Access-Entwickler nicht jeden Tag über den Weg laufen:<\/p>\n