<\/p>\n
André Minhorst, Duisburg<\/b><\/p>\n
Das Sicherheitssystem von Access bietet die Möglichkeit, Benutzer und Benutzergruppen zu verwalten und deren Berechtigungen an den einzelnen Objekten der Access-Datenbank festzulegen. Die Verwaltung der Berechtigungen erfolgt in zwei Dialogen, die über die Menüleiste geöffnet werden können. Leider haben diese Dialoge Nachteile – sie stehen z. B. in der Runtime-Version nicht zur Verfügung und sind nicht anpassbar. Im folgenden Beitrag erfahren Sie, wie Sie dem Anwender eine maßgeschneiderte und immer verfügbare Benutzerverwaltung zur Verfügung stellen.<\/b><\/p>\n
Die Verwaltung der Berechtigungen von Benutzern und Benutzergruppen verläuft im optimalen Fall so, dass bei der Erstellung der Anwendung bereits alle Benutzergruppen und deren Berechtigungen feststehen. Außerdem sollte die Vergabe der Berechtigungen ausschließlich auf Gruppenebene erfolgen, niemals auf Benutzerebene.<\/p>\n
Unter diesen Voraussetzungen müssen nach der Inbetriebnahme der Anwendung nur noch gelegentlich Benutzer hinzugefügt oder entfernt und deren Gruppenzugehörigkeiten angepasst werden.<\/p>\n
Wenn die Datenbankanwendung diese Funktionalität unabhängig von der Art der Weitergabe (als herkömmliche Datenbank oder als Runtime-Version) aufweisen soll, müssen Sie das entsprechende Werkzeug selbst bereitstellen. Im Gegensatz zu den Dialogen zur Verwaltung von Benutzern und Gruppen sind die entsprechenden VBA-Anweisungen immer verfügbar. Mit Hilfe eines Formulars zur Verwaltung von Benutzern und Gruppen können Sie dem Anwender außerdem ein für dessen Bedürfnisse maßgeschneidertes Werkzeug zur Verfügung stellen.<\/p>\n
Im vorliegenden Beitrag erfahren Sie, wie Sie ein solches Formular erstellen und welche Techniken zum codegesteuerten Verwalten einer Datenbank benötigt werden.<\/p>\n
Als Beispieldatenbank bietet sich die Stundenzetteldatenbank aus der Ausgabe 4\/2002 von Access im Unternehmen an. Die Stundenzetteldatenbank verfügt bereits über ein aktiviertes Sicherheitssystem mit verschiedenen Benutzergruppen und entsprechenden Berechtigungen. Sie können die hier beschriebenen Formulare und Module in dieser Datenbank anlegen und anwenden.<\/p>\n
Wenn Ihnen die Anwendung des Sicherheitssystems nicht geläufig ist, können Sie die Beiträge Skalierbare Datensicherheit mit Access und Stundenzetteldatenbank zur Dokumentation von Arbeitsleistungen aus Heft 4\/2002 als Grundlage für die Lektüre des vorliegenden Beitrags verwenden. <\/p>\n
Einige Formulare und Funktionen können theoretisch auch unverändert in anderen Datenbankanwendungen zum Einsatz kommen. Dazu können Sie entweder die benötigten Datenbankobjekte in die Zieldatenbank exportieren oder Sie platzieren sie in einer eigenen Datenbank und greifen per Referenz auf die dort vorhandenen Funktionen zu.<\/p>\n
Im Beitrag Referenzen und Bibliotheken der vorliegenden Ausgabe erfahren Sie, wie Sie die Funktionen einer solchen Datenbank in andere Datenbanken einbinden und dort zur Verfügung stellen können.<\/p>\n
Sie finden die Beispieldatenbanken zum vorliegenden Beitrag unter den Namen Berechtigungen97.mdb und Berechtigungen2000.mdb auf der beiliegenden Heft-CD. <\/p>\n
Zur Verwaltung von Benutzern und Benutzergruppen in einem neu erstellten Formular ist der Einsatz von VBA unumgänglich. Daher lernen Sie in den folgenden Abschnitten zunächst einiges über die berechtigungsspezifische Seite des Objektmodells von Access.<\/p>\n
Das Hauptobjekt der DAO-Bibliothek ist das Objekt DBEngine. Alle weiteren Objekte dieser Bibliothek sind diesem Objekt untergeordnet.<\/p>\n
Die Workspaces-Auflistung ist dem DBEngine-Objekt untergeordnet und enthält alle Workspaces.<\/p>\n
Das Workspace-Objekt dient zur Verwaltung einer Sitzung mit Access. Eine Sitzung wird durch die Anmeldung an die Jet-Engine gestartet und endet mit der Abmeldung. Das bedeutet unter Access 97, dass die Sitzung mit dem Starten von Access beginnt, während die Sitzung unter Access 2000 erst mit dem öffnen einer Datenbank startet.<\/p>\n
Auch wenn Sie sich nicht bewusst bei einer Datenbank anmelden, befinden Sie sich zu jeder Zeit während der Arbeit mit einer Access-Datenbank in einer Sitzung. Bei der Anwendung von nicht geschützten Datenbanken erfolgt die Anmeldung nämlich automatisch mit dem Benutzernamen Admin, der in jeder Arbeitsgruppendatei enthalten ist. Als nicht geschützt gilt eine Datenbank in diesem Falle, wenn für den Benutzer Admin kein Passwort vergeben wurde. <\/p>\n
Wenn Sie innerhalb einer Access-Sitzung Informationen über Benutzer, Benutzergruppen etc. verwenden möchten, erstellen Sie einfach eine Referenz auf das Workspace-Objekt der aktuellen Sitzung und greifen über entsprechende Auflistungen auf die gewünschten Informationen zu. Zur Referenzierung des Workspace-Objektes müssen Sie lediglich eine entsprechende Objektvariable deklarieren und anschließend initialisieren:<\/p>\n
Dim wrk As Workspace\r\nSet wrk = DBEngine.Workspaces(0)<\/pre>\nDer Eintrag der Workspaces-Auflistung mit dem Index 0 entspricht immer der aktuellen Sitzung. Wenn Sie auf eine andere Sitzung zugreifen möchten, müssen Sie das über den Namen der Sitzung erledigen.<\/p>\n
Die Auflistungen Groups und Users<\/h2>\n
Nachdem Sie das Workspace-Objekt festgelegt haben, können Sie leicht auf die Auflistungen Groups und Users zugreifen, um die Benutzergruppen und Benutzer der aktuellen Sitzung anzuzeigen.<\/p>\n
Gruppen auflisten<\/h3>\n
Die Prozedur aus Quellcode 1 listet alle Namen der in der aktuellen Sitzung verwendeten Arbeitsgruppe vorhandenen Gruppen auf:<\/p>\n
Die Prozedur durchläuft alle Einträge der Groups-Auflistung und gibt den jeweiligen Namen im Testfenster aus. Gehen Sie folgendermaßen vor, um die Prozedur auszuprobieren:<\/p>\n
Public Sub GruppenAnzeigen()\r\n Dim wrk As Workspace\r\n Dim grp As Group\r\n Set wrk = DBEngine.Workspaces(0)\r\n For Each grp In wrk.Groups\r\n Debug.Print grp.Name\r\n Next grp\r\nEnd Sub<\/pre>\nQuellcode 1<\/b><\/p>\n
<\/p>\n
<\/b><\/p>\n
Bild 1: Auflistung aller Benutzergruppen im Testfenster<\/span><\/b><\/p>\n
<\/p>\n
<\/b><\/p>\n
Bild 2: Ausgabe von Benutzern und deren Gruppen<\/span><\/b><\/p>\n
Die Prozedur erzeugt für die Beispieldatenbank Stundenzettelverwaltung die Ausgabe aus Bild 1.<\/p>\n
Benutzer auflisten<\/h3>\n
Die Prozedur zur Auflistung aller Benutzer der in der aktuellen Sitzung verwendeten Arbeitsgruppe hat einen ähnlichen Aufbau:<\/p>\n
Public Sub BenutzerAnzeigen()\r\n Dim wrk As Workspace\r\n Dim usr As user\r\n Set wrk = DBEngine.Workspaces(0)\r\n For Each usr In wrk.Users\r\n Debug.Print usr.Name\r\n Next usr\r\nEnd Sub<\/pre>\nAbhängigkeiten zwischenBenutzer und Gruppe<\/h2>\n
Zur Ermittlung der Benutzer einer Gruppe bzw. der Gruppen eines Benutzers können Sie ebenfalls Auflistungen verwenden. Das folgende Beispiel ist eine Modifikation der Prozedur BenutzerAnzeigen. Sie ist um eine For Next-Schleife zur Anzeige aller Gruppen des aktuellen Benutzers erweitert worden:<\/p>\n
Public Sub BenutzerUndGruppenAnzeigen()\r\n Dim wrk As Workspace\r\n Set wrk = DBEngine.Workspaces(0)\r\n Dim usr As user\r\n Dim i As Integer\r\n For Each usr In wrk.Users\r\n Debug.Print usr.Name\r\n For i = 0 To usr.Groups.Count - 1\r\n Debug.Print \" \" _ & usr.Groups(i).Name\r\n Next i\r\n Next usr\r\nEnd Sub<\/pre>\nBild 2 zeigt das Ergebnis der Prozedur BenutzerUndGruppenAnzeigen.<\/p>\n
Hinweis<\/h3>\n
Die Anzeige der Gruppen und der dazugehörenden Benutzer erfolgt analog. <\/p>\n
Mit den soeben beschriebenen Funktionen sind Sie bereits in der Lage, ein Formular zur Anzeige von Benutzern, Gruppen und deren Abhängigkeiten anzuzeigen.<\/p>\n
Public Function BenutzerHinzufuegen(Benutzername As _ String, PID As String, Passwort As String)\r\n On Error GoTo BenutzerHinzufuegen_Err\r\n Dim wrk As Workspace\r\n Dim usr As user\r\n Set wrk = DBEngine.Workspaces(0)\r\n Set usr = wrk.CreateUser(Benutzername, PID, _ Passwort)\r\n wrk.Users.Append usr\r\n BenutzerHinzufuegen = True\r\n Exit Function\r\nBenutzerHinzufuegen_Err:\r\n If Err.Number = 3390 Then\r\n MsgBox \"Der Benutzer mit dem Benutzernamen ''\" _ & Benutzername & \"'' ist bereits vorhanden.\"\r\n End If\r\n BenutzerHinzufuegen = False\r\nEnd Function<\/pre>\nQuellcode 2<\/b><\/p>\n
Public Function GruppeHinzufuegen(Gruppenname As _ String, PID As String)\r\n On Error GoTo GruppeHinzufuegen_Err\r\n Dim wrk As Workspace\r\n Dim grp As Group\r\n Set wrk = DBEngine.Workspaces(0)\r\n Set grp = wrk.CreateGroup(Gruppenname, PID)\r\n wrk.Groups.Append grp\r\n GruppeHinzufuegen = True\r\n Exit Function\r\nGruppeHinzufuegen_Err:\r\n If Err.Number = 3390 Then\r\n MsgBox \"Die Datenbank enthält bereits eine \" _ & \"Gruppe mit der Bezeichnung ''\" _ & Gruppenname & \"''.\"\r\n End If\r\n GruppeHinzufuegen = False\r\nEnd Function<\/pre>\nQuellcode 3<\/b><\/p>\n
Zur Verwaltung dieser Objekte fehlen nun noch die Möglichkeiten, Benutzer und Gruppen anzulegen, zu löschen und Benutzer und Gruppen einander zuzuordnen.<\/p>\n
Benutzer und Gruppen anlegen<\/h2>\n
Das Anlegen von Benutzern und Gruppen erfolgt für beide Auflistungen ähnlich.<\/p>\n
Benutzer anlegen<\/h3>\n
Für das Anlegen eines neuen Benutzers sind neben den üblichen Anweisungen zur Deklaration und zur Initialisierung der Variablen zwei Befehle erforderlich.<\/p>\n
Die Methode CreateUser des Workspace-Objekts hat drei Parameter: Benutzernamen, PID und Kennwort. Mit ihr erstellen Sie zunächst ein neues Benutzerobjekt, das Sie anschließend mit der Methode Append der Auflistung Users hinzufügen.<\/p>\n
Die Funktion aus Quellcode 2 enthält neben diesen Anweisungen noch eine rudimentäre Fehlerbehandlung, die eine entsprechende Meldung ausgibt, wenn der anzulegende Benutzer bereits vorhanden ist.<\/p>\n
Gruppen anlegen<\/h3>\n
Das Anlegen einer neuen Gruppe erfolgt ebenfalls durch die Verwendung zweier Methoden des Workspace-Objektes:<\/p>\n
Nach dem Erstellen der Gruppe mit der Methode CreateGroup wird diese mit der Methode Append zur Auflistung Groups hinzugefügt. Die Methode CreateGroup benötigt die übergabe zweier Argumente: Gruppenname und PID.<\/p>\n
Die Funktion aus Quellcode 3 beinhaltet die zum Hinzufügen einer Gruppe benötigten Befehle sowie eine entsprechende Fehlerbehandlung, die sich beim Versuch, eine bereits bestehende Gruppe hinzuzufügen, meldet.<\/p>\n
Public Function BenutzerLoeschen _ (Benutzername As String)\r\n On Error GoTo BenutzerLoeschen_Err\r\n Dim wrk As Workspace\r\n Set wrk = DBEngine.Workspaces(0)\r\n wrk.Users.Delete Benutzername\r\n BenutzerLoeschen = True\r\n Exit Function\r\nBenutzerLoeschen_Err:\r\n BenutzerLoeschen = False\r\nEnd Function<\/pre>\nQuellcode 4<\/b><\/p>\n
Public Function _ BenutzerZuGruppeHinzufuegen _ (Benutzer As String, Gruppe As _ String)\r\n On Error GoTo BenutzerZuGruppeHinzufuegen_Err\r\n Dim wrk As Workspace\r\n Dim usr As user\r\n Dim grp As Group\r\n Set wrk = DBEngine.Workspaces(0)\r\n Set usr = wrk.Users(Benutzer)\r\n Set grp = usr.CreateGroup(Gruppe)\r\n usr.Groups.Append grp\r\n usr.Groups.Refresh\r\n BenutzerZuGruppeHinzufuegen = True\r\n Exit Function\r\nBenutzerZuGruppeHinzufuegen_Err:\r\n BenutzerZuGruppeHinzufuegen = False\r\nEnd Function<\/pre>\n<\/p>\n
Quellcode 5<\/b><\/p>\n
Hinweis<\/h3>\n
In dem Formular zur Verwaltung von Benutzern und Gruppen, das Sie später kennen lernen werden, befindet sich keine Funktion zum Anlegen oder Löschen von Benutzergruppen. Die benötigten Benutzergruppen und deren Berechtigungen sollten nach der Erstellung der Anwendung weitgehend feststehen und sollten im Normalfall nicht regelmäßigen änderungen unterliegen. <\/p>\n
Benutzer und Gruppen löschen<\/h2>\n
Selbstverständlich können Sie die mit den bereits vorgestellten Funktionen angelegten Benutzer und Gruppen auch wieder löschen.<\/p>\n
Benutzer löschen<\/h3>\n
Das Löschen eines Benutzers erfolgt über die Methode Delete der Auflistung Users. Einziger Parameter der Methode ist der Benutzername.<\/p>\n
Die Funktion BenutzerLoeschen beinhaltet alle benötigten Anweisungen zum Löschen eines Benutzers und gibt nach erfolgtem Löschen den Wert True zurück (s. Quellcode 4).<\/p>\n
Gruppen löschen<\/h3>\n
Das Löschen einer Gruppe erfolgt analog zum Löschen eines Benutzers. Die einzigen Unterschiede sind die Verwendung der Groups- statt der Users-Auflistung und des Gruppen- statt des Benutzernamens.<\/p>\n
Hinweis<\/h3>\n
Den Quellcode zur entsprechenden Funktion GruppeLoeschen finden Sie in der Beispieldatenbank. <\/p>\n
Benutzer zu Gruppe hinzufügen<\/h2>\n
Das Hinzufügen eines Benutzers zu einer Gruppe kann auf zwei Wegen erfolgen. Entweder Sie fügen den Benutzer der Users-Auflistung der Zielgruppe hinzu oder Sie fügen die Zielgruppe der Groups-Auflistung des Benutzers hinzu.<\/p>\n
Da beide Methoden einen ähnlichen Ablauf haben, lernen Sie hier nur eine von beiden kennen (die andere finden Sie in der Beispieldatenbank).<\/p>\n
Die Funktion BenutzerZuGruppeHinzufuegen (s. Quellcode 5) hat zwei Parameter: den Namen des Benutzers und den Namen der Zielgruppe.<\/p>\n
Public Function BenutzerAusGruppeEntfernen(Benutzer _ As String, Gruppe As String)\r\n On Error GoTo BenutzerAusGruppeEntfernen_Err\r\n Dim wrk As Workspace\r\n Dim grp As Group\r\n Set wrk = DBEngine.Workspaces(0)\r\n Set grp = wrk.Groups(Gruppe)\r\n grp.Users.Delete Benutzer\r\n BenutzerAusGruppeEntfernen = True\r\n Exit Function\r\nBenutzerAusGruppeEntfernen_Err:\r\n BenutzerAusGruppeEntfernen = False\r\nEnd Function<\/pre>\nQuellcode 6<\/b><\/p>\n
Public Function KennwortAendern(Benutzer As String, _ AltesKennwort As String, NeuesKennwort As String) _ As Boolean\r\n On Error GoTo KennwortAendern_Err\r\n Dim wrk As Workspace\r\n Dim usr As user\r\n Set wrk = DBEngine.Workspaces(0)\r\n Set usr = wrk.Users(Benutzer)\r\n usr.NewPassword AltesKennwort, NeuesKennwort\r\n KennwortAendern = True\r\n Exit Function\r\nKennwortAendern_Err:\r\n If Err.Number = 3033 Then\r\n MsgBox \"Das alte Kennwort ist nicht korrekt.\"\r\n End If\r\n KennwortAendern = False\r\nEnd Function<\/pre>\nQuellcode 7<\/b><\/p>\n
Nach dem Deklarationsteil erstellt die Funktion zunächst ein User-Objekt für den gewünschten Benutzer und ein Group-Objekt mit der Zielgruppe.<\/p>\n
Das Group-Objekt wird schließlich der Groups-Auflistung des Benutzers hinzugefügt.<\/p>\n
Benutzer aus Gruppe entfernen<\/h2>\n
Das Entfernen eines Benutzers aus einer Gruppe erfolgt mit der Funktion aus Quellcode 6. Die Funktion hat zwei Parameter: den Namen des Benutzers und den Namen der Gruppe, aus der er entfernt werden soll.<\/p>\n
Kernbefehl der Funktion ist die Methode Delete der Users-Auflistung einer Gruppe. Sie löscht den angegebenen Benutzer aus der entsprechenden Gruppe.<\/p>\n
Kennwort ändern<\/h2>\n
Die letzte benötigte Funktion dient zum ändern des Kennworts eines Benutzers (s. Quellcode 7). Dazu sind drei Parameter erforderlich: Der Benutzername, das alte Kennwort und das neue Kennwort.<\/p>\n
Die wichtigste Anweisung der Funktion beinhaltet den Aufruf der Methode NewPassword des User-Objekts. Es übergibt das alte und das neue Passwort für den zuvor per User-Objekt festgelegten Benutzer.<\/p>\n
Die Fehlerbehandlung reagiert mit einer Meldung, wenn das eingegebene alte Kennwort nicht stimmt.<\/p>\n
Für Anwender von Access-Datenbanken ist es sicher ein wenig viel verlangt, Benutzer und deren Einteilung in Gruppen über das Testfenster mit VBA-Funktionen zu verwalten.<\/p>\n
Daher stellen Sie ihm ein Formular mit allen dafür vorgesehenen Funktionen zur Verfügung.<\/p>\n
Aufbau des Formulars<\/h2>\n
Das Formular enthält ein Register mit zwei Registerseiten. Die erste Seite zeigt jeweils einen Benutzer und die Gruppen an, denen er zugeteilt ist (siehe Bild 3). Hier können Sie Benutzer hinzufügen, löschen und deren Kennwort ändern sowie die Gruppen auswählen, denen er zugeteilt ist.<\/p>\n
<\/p>\n
<\/b><\/p>\n
Bild 3: Anzeige eines Benutzers und seiner Gruppen<\/span><\/b><\/p>\n
Die zweite Registerseite enthält die Informationen der ersten Seite aus Gruppensicht (siehe Bild 4): Das rechte Listenfeld zeigt alle Benutzer an, die zur im Kombinationsfeld ausgewählten Gruppe gehören.<\/p>\n
<\/p>\n
<\/b><\/p>\n
Bild 4: Gruppen und die enthaltenen Benutzer<\/span><\/b><\/p>\n
Füllen von Steuerelementen mitCallback-Funktionen<\/h2>\n
Das Formular besteht im Wesentlichen aus den Kombinations- und Listenfeldern zur Anzeige der Benutzer und Gruppen.<\/p>\n
Listen füllen mit Callback-Funktionen<\/h3>\n
Das Füllen dieser Steuerelemente erfolgt durch den Einsatz sog. Callback-Funktionen. Diese Funktionen kommen immer dann zum Einsatz, wenn die gewünschten Daten nicht im Datenbestand der Datenbank vorliegen und der Umfang der Daten möglicherweise zu groß für die Unterbringung in einer Wertliste ist.<\/p>\n
Hinweis<\/h3>\n
Im Beitrag Kombinations- und Listenfelder bevölkern in Ausgabe 4\/2002 von Access im Unternehmen erhalten Sie grundlegende Informationen zum Einsatz von Callback-Funktionen und deren Eigenschaften. <\/p>\n
Das Formular erfordert den Einsatz von vier unterschiedlichen Callback-Funktionen, die zum Füllen von Steuerelementen mit den folgenden Daten dienen:<\/p>\n
alle Benutzer<\/li>\n alle Gruppen<\/li>\n alle Benutzer, die einer bestimmten Gruppe zugeordnet sind<\/li>\n alle Gruppen, die einem bestimmten Benutzer zugeordnet sind<\/li>\n Da alle vier Funktionen einen weitgehend identischen Ablauf haben, lernen Sie im Folgenden nur die Funktion zum Einlesen aller Benutzer kennen.<\/p>\n
Kombinationsfeld mit Benutzern füllen<\/h3>\n
Die Funktion aus Quellcode 8 füllt das Kombinationsfeld cboBenutzer auf der ersten Registerseite und das Listenfeld lstAlleBenutzer auf der zweiten Registerseite des Formulars frmBerechtigungen.<\/p>\n
Die folgende Auflistung beschreibt den Ablauf der nacheinander erfolgenden Aufrufe der Funktion durch das Kombinations- bzw. Listenfeld mit den entsprechenden Parametern:<\/p>\n
Parameter acLBInitialize: Ermittlung der Anzahl von Benutzern mit der Eigenschaft wrk.Users.Count<\/li>\n Parameter acLBOpen: Rückgabe des Timer-Wertes<\/li>\n Function BenutzerErmitteln(Feld As Control, ID As _ Variant, Zeile As Variant, Spalte As Variant, Code _ As Variant) As Variant\r\n Static i As Integer\r\n Dim Rueckgabewert As Variant\r\n Dim wrk As DAO.Workspace\r\n Set wrk = DBEngine.Workspaces(0)\r\n Select Case Code\r\n Case acLBInitialize\r\n i = wrk.Users.Count\r\n Rueckgabewert = i\r\n Case acLBOpen\r\n Rueckgabewert = Timer\r\n Case acLBGetRowCount\r\n Rueckgabewert = i\r\n Case acLBGetColumnCount\r\n Rueckgabewert = 1\r\n Case acLBGetColumnWidth\r\n Rueckgabewert = -1\r\n Case acLBGetValue\r\n Rueckgabewert = wrk.Users(Zeile).Name\r\n Case acLBGetFormat\r\n Case acLBEnd\r\n End Select\r\n BenutzerErmitteln = Rueckgabewert\r\nEnd Function<\/pre>\nQuellcode 8<\/b><\/p>\n
<\/p>\n
<\/b><\/p>\n
Bild 5: Einstellen der Callback-Funktion als Herkunftstyp<\/span><\/b><\/p>\n
Parameter acLBGetColumnCount: Rückgabe des Wertes 1 als Spaltenanzahl<\/li>\n Parameter acLBGetColumnWidth: Rückgabe des Wertes -1, damit die Spaltenbreite automatisch festgelegt wird<\/li>\n Parameter acLBGetColumnWidth: Rückgabe des Inhalts der statischen Variablen i mit der Anzahl der Benutzer<\/li>\n Parameter acLBGetValue: Rückgabe der Benutzernamen mit der Eigenschaft wrk.Users(Zeile).Name.Der Parameter Zeile wird dabei von der Funktion zur Verfügung gestellt. Dieser Teil wird für jeden vorhandenen Benutzer je einmal aufgerufen.<\/li>\n Damit das Kombinationsfeld cboBenutzer mit den in der Callback-Funktion ermittelten Daten gefüllt wird, müssen Sie die Eigenschaft Herkunftstyp auf den Namen der Funktion einstellen (siehe Bild 5).<\/p>\n
Kombinationsfeld mitGruppen füllen<\/h3>\n
Das Kombinationsfeld cboGruppen auf der zweiten Registerseite des Formulars wird ebenfalls mit einer Callback-Funktion gefüllt.<\/p>\n
Diese führt prinzipiell die gleichen Schritte wie die im vorhergehenden Abschnitt beschriebene Funktion durch und soll daher hier nicht weiter beschrieben werden.<\/p>\n
Private Sub Form_Current()\r\n Me.cboBenutzer = Me.cboBenutzer.ItemData(0)\r\n Me.lstBenutzergruppen.RowSourceType = \"GruppenEinesBenutzersErmitteln\"\r\n Me.lstBenutzergruppen.Requery\r\n Me.cboGruppen = Me.cboGruppen.ItemData(0)\r\n Me.lstGruppenbenutzer.RowSourceType = \"BenutzerEinerGruppeErmitteln\"\r\n Me.lstGruppenbenutzer.Requery\r\nEnd Sub<\/pre>\nQuellcode 9<\/b><\/p>\n
Hinweis<\/h3>\n
Sie finden diese und die anderen, nicht im vorliegenden Beitrag abgedruckten Funktionen in der Beispieldatenbank auf der beiliegenden Heft-CD. <\/p>\n
Listenfelder mit Informationen füllen<\/h3>\n
Zwei der vier Listenfelder können ohne Probleme beim öffnen des Formulars mit den gewünschten Daten gefüllt werden. Dabei handelt es sich um die jeweils auf der linken Seite der Registerseiten befindlichen Listenfelder, die alle Gruppen bzw. alle Benutzer anzeigen.<\/p>\n
Problematischer ist es bei den beiden übrigen Listenfeldern, die lediglich die zu einem Benutzer gehörenden Gruppen bzw. die zu einer Gruppe gehörenden Benutzer anzeigen.<\/p>\n
Auf der ersten Registerseite beispielsweise zeigt das Listenfeld lstBenutzergruppen alle Gruppen zu dem aktuell im Kombinationsfeld ausgewählten Benutzer an.<\/p>\n
Dazu ermittelt die dort verwendete Callback-Funktion GruppenEinesBenutzersErmitteln einen gegenüber der weiter oben beschriebenen Funktion BenutzerErmitteln zwei Unterschiede:<\/p>\n
Die Zeile zur Ermittlung der Anzahl der Einträge lautet folgendermaßen:<\/p>\n
i = wrk.Users(Me.cboBenutzer). _ Groups.Count<\/pre>\nDie Methode Count ermittelt dabei alle Gruppen des im Kombinationsfeld cboBenutzer ausgewählten Benutzers.<\/p>\n
Der zweite Unterschied findet sich in der Rückgabe der Gruppennamen.<\/p>\n
Dort werden ebenfalls nur solche Einträge berücksichtigt, die sich auf den entsprechenden Benutzer beziehen.<\/p>\n
Rueckgabewert = wrk.Users _(Me.cboBenutzer).Groups(Zeile).Name<\/pre>\nWenn der Wert des Kombinationsfeldes Null ist, also kein Eintrag ausgewählt ist, bricht die Callback-Funktion mit einem Fehler ab.<\/p>\n
Daher müssen Sie dafür sorgen, dass die Kombinationsfelder vor dem Aufruf der davon abhängigen Callback-Funktionen mit einem Wert gefüllt werden.<\/p>\n
Legen Sie dazu für die Ereigniseigenschaft Beim Anzeigen des Formulars eine Prozedur an, die folgende Schritte ausführt:<\/p>\n
Auswahl eines Wertes im Kombinationsfeld<\/li>\n Zuweisen der Callback-Funktion an die Eigenschaft Herkunftstyp der abhängigen Listenfelder<\/li>\n Diese Aufgabe übernimmt die Prozedur aus Quellcode 9. Sie weist den Kombinationsfeldern der beiden Registerseiten den jeweils ersten Wert der Datensatzherkunft und anschließend der Eigenschaft RowSourceType der Listenfelder den Namen der entsprechenden Callback-Funktion zu.<\/p>\n
Schließlich sorgt es durch die Requery-Methode für die Ausführung der Callback-Funktionen.<\/p>\n
Funktionalität des Formulars<\/h2>\n
Nachdem die Steuerelemente mit Daten gefüllt sind, folgt nun die Hauptaufgabe nahezu jeder Datenbank: die Bearbeitung von Daten.<\/p>\n
Allerdings handelt es sich im vorliegenden Fall nicht um Daten aus den Tabellen der Datenbank, sondern um die Benutzerdaten der Datenbank.<\/p>\n
Zu deren Bearbeitung soll das Formular die folgenden Funktionen zur Verfügung stellen:<\/p>\n
Anlegen von Benutzern<\/li>\n Löschen von Benutzern<\/li>\n ändern des Kennworts eines Benutzers<\/li>\n Benutzer zu Gruppen hinzufügen und von Gruppen entfernen<\/li>\n Die Steuerelemente auf dem ersten Registerblatt decken bereits alle gewünschten Funktionen ab. Die zweite Registerseite dient lediglich der alternativen Anzeige der Zuordnung von Benutzern und Gruppen.<\/p>\n
Anlegen von Benutzern<\/h3>\n
Das Anlegen von Benutzern erfolgt durch einen Mausklick auf die Schaltfläche cmdBenutzerAnlegen. Die dadurch ausgelöste Prozedur öffnet das Formular frmBenutzerAnlegen (siehe Bild 6) im Dialog-Modus.<\/p>\n
Dadurch wird der Prozedurablauf unterbrochen, bis das Formular entweder geschlossen oder unsichtbar gemacht wird.<\/p>\n
<\/p>\n
<\/b><\/p>\n
Bild 6: Benutzer anlegen<\/span><\/b><\/p>\n
Das Formular enthält die drei Felder zur Eingabe von Benutzername, PID und Kennwort. Nach deren Eingabe kann der Benutzer auf eine der beiden Schaltflächen mit der Beschriftung OK oder Abbrechen klicken.<\/p>\n
Die durch die Schaltfläche OK ausgelöste Ereignisprozedur überprüft, ob für die beiden Felder txtBenutzername und txtPID ein Wert eingegeben wurde. Für das Feld txtKennwort ist das nicht zwingend erforderlich.<\/p>\n
Anschließend setzt sie die Eigenschaft Sichtbar des Formulars auf den Wert False. Dadurch verschwindet das Formular und die aufrufende Prozedur wird fortgesetzt.<\/p>\n
Die Ereignisprozedur der Schaltfläche Abbrechen dient zum Schließen des Formulars.<\/p>\n
Die Prozedur, die das Formular aufgerufen hat, wertet nun die Eingabe aus und verwendet diese als Parameter für den Aufruf der Funktion BenutzerHinzufuegen, die bereits weiter vorne beschrieben wurde.<\/p>\n
Falls die Funktion den Wert True zurückliefert – was dem erfolgreichen Anlegen des gewünschten Benutzers entspricht – erscheint eine entsprechende Meldung.<\/p>\n
Löschen von Benutzern<\/h3>\n
Das Löschen von Benutzern erfordert wesentlich weniger Aufwand als das Anlegen. Die Prozedur, die durch einen Mausklick auf die Schaltfläche cmdBenutzerLoeschen ausgelöst wird, ruft lediglich die Funktion BenutzerLoeschen auf.<\/p>\n
Als übergabeparameter verwendet sie den Namen des aktuell im Kombinationsfeld ausgewählten Benutzers.<\/p>\n
ändern des Kennworts<\/h3>\n
Zum ändern des Kennworts ist ebenfalls ein weiteres Formular erforderlich. Das Formular dient zur Eingabe des alten Kennworts sowie der zweimaligen Eingabe des neuen Kennworts, wie es allgemein üblich ist (siehe Bild 7).<\/p>\n
Private Sub cmdGruppeZuBenutzerHinzufuegen_Click()\r\n On Error Resume Next\r\n BenutzerZuGruppeHinzufuegen Me.cboBenutzer, _ Me.lstAlleGruppen\r\n Me.lstBenutzergruppen.Requery\r\n Me.lstGruppenbenutzer.Requery\r\nEnd Sub<\/pre>\nQuellcode 10<\/b><\/p>\n
<\/p>\n
<\/b><\/p>\n
Bild 7: ändern des Kennworts<\/span><\/b><\/p>\n
Die Schaltfläche cmdKennwortAendern auf der ersten Registerseite des Formulars frmBerechtigungen dient dem Aufrufen des Formulars frmKennwortAendern.<\/p>\n
Die dadurch ausgelöste Ereignisprozedur öffnet das Formular im Dialogmodus, damit das aufrufende Formular die Eingaben nach dem Beenden des Dialogs auswerten kann.<\/p>\n
Das Formular frmKennwortAendern hat zwei Schaltflächen zum Beenden des Dialogs, die denen des Dialogs zum Anlegen von Benutzern ähneln. Auch hier findet nach dem Betätigen der OK-Schaltfläche eine Eingabeprüfung statt.<\/p>\n
Nach dem Beenden des Dialogs verwendet die aufrufende Prozedur die eingegebenen Werte als Parameter für den Aufruf der Funktion KennwortAendern. <\/p>\n
Diese Funktion liefert nach erfolgreicher änderung des Kennworts den Wert True zurück, ansonsten den Wert False.<\/p>\n
Bei falscher Eingabe zeigt die Funktion eine entsprechende Meldung an.<\/p>\n
Hinzufügen eines Benutzers zu einer Gruppe<\/h3>\n
Das Formular frmBerechtigungen bietet vier Möglichkeiten an, einen Benutzer einer Gruppe und umgekehrt zuzuordnen:<\/p>\n
per Doppelklick auf einen Eintrag des linken Listenfeldes auf dem Registerblatt Benutzer<\/li>\n per Klick auf die entsprechende Schaltfläche zwischen den beiden Listenfeldern auf dem gleichen Registerblatt<\/li>\n durch die entsprechenden Möglichkeiten auf dem Registerblatt Gruppen<\/li>\n Durch den Einsatz jeder dieser Möglichkeiten wird – wie in Quellcode 10 – die Funktion BenutzerZuGruppeHinzufuegen aufgerufen.<\/p>\n
Als Parameter verwendet die aufrufende Prozedur die Werte des Kombinationsfeldes cboBenutzer und des Listenfeldes lstAlleGruppen.<\/p>\n
Für den Fall, dass im Listenfeld lstAlleGruppen beim Aufruf kein Eintrag markiert ist, enthält die Prozedur eine Fehlerbehandlung, die bei Fehlern einfach die folgende Anweisung ausführt.<\/p>\n
Sonst würde die Verwendung eines Nullwertes als Parameter eine Fehlermeldung provozieren.<\/p>\n
Nach dem Hinzufügen des Benutzers zu der ausgewählten Gruppe durch die Funktion BenutzerZuGruppeHinzufuegen aktualisiert die Prozedur noch die beiden Listenfelder<\/p>\n
Das Zuordnen von Benutzern zu Gruppen von der Registerseite Gruppen aus funktioniert ähnlich.<\/p>\n
Entfernen eines Benutzers von einer Gruppe<\/h3>\n
Für das Entfernen eines Benutzers von einer Gruppe und umgekehrt gibt es ebenfalls vier Möglichkeiten – nämlich jeweils auf den beiden Registerseiten durch einen Klick auf die Schaltflächen mit dem Pfeil nach links bei markiertem Eintrag im rechten Listenfeld oder durch einen Doppelklick auf einen Eintrag in einem der beiden rechten Listenfelder.<\/p>\n
Der Ablauf entspricht weitgehend dem beim Zuordnen eines Benutzers zu einer Gruppe und umgekehrt – mit der Ausnahme, dass die Funktion GruppeVonBenutzerEntfernen zum Entfernen der Zuordnung verwendet wird.<\/p>\n
Verwendung des Formular alsBestandteil einerBibliotheksdatenbank<\/h2>\n
Wenn Sie die Benutzerverwaltung nicht in die Zieldatenbank integrieren, sondern diese als Teil einer Bibliotheksdatenbank mit der Zieldatenbank verknüpfen möchten, kann das wie im Beitrag Verweise und Bibliotheken in der vorliegenden Ausgabe von Access im Unternehmen erfolgen.<\/p>\n
Nachdem Sie die Bibliotheksdatenbank in geeigneter Form eingebunden haben, können Sie auf alle dort vorhandenen, öffentlichen Funktionen zugreifen.<\/p>\n
Wie aber greifen Sie auf das Formular zum Bearbeiten der Benutzer und Benutzergruppen zu<\/p>\n
Die einzige Möglichkeit zum Einbinden von Formularen verknüpfter Datenbanken zu verwenden ist eine Funktion mit einem entsprechenden Aufruf.<\/p>\n
Gehen Sie folgendermaßen vor, um die Datenbank Berechtigungen97.mdb bzw. Berechtigungen2000.mdb als Bibliotheksdatenbank in eine andere Datenbank einzubinden:<\/p>\n
öffnen Sie die Bibliotheksdatenbank mit dem Formular zur Bearbeitung von Benutzern und Benutzergruppen.<\/li>\n Legen Sie eine Prozedur mit den Anweisungen aus Quellcode 11 in einem neuen Modul an.<\/li>\n Schließen Sie die Datenbank.<\/li>\n Falls dies noch nicht geschehen ist, erstellen Sie in der Datenbank, deren Benutzer Sie pflegen möchten, einen Verweis auf die Bibliotheksdatenbank.<\/li>\n Geben Sie zum Testen der Funktionalität im Testfenster (zu öffnen mit der Tastenkombination Strg + G) den Namen der Funktion OeffneBenutzerverwaltung ein. (<\/li>\n Public Function _ OeffneBenutzerverwaltung()\r\n DoCmd.OpenForm _ \"frmBenutzerverwaltung\"\r\nEnd Function<\/pre>\nQuellcode 11<\/b><\/p>\n
Mit den vorgestellten Techniken können Sie beliebigen Anwendungen eine komfortable Funktionalität zum Zuordnen von Benutzern zu Benutzergruppen hinzufügen.<\/p>\n
Die vorgestellte Lösung ist etwas komfortabler als die in Access eingebaute Funktionalität, da sie auch die Anzeige aller Benutzer einer Gruppe ermöglicht.<\/p>\n
Die Funktionalität dient vor allem dem Einsatz in solchen Varianten von Access-Anwendungen, die dem Benutzer von Haus aus nicht die Möglichkeit bieten, die eingebaute Benutzerverwaltung von Access zu verwenden. Das ist z. B. in der Runtime-Version der Fall.<\/p>\n
Eine denkbare Erweiterung wäre die Auswahl von Benutzern aus der Mitarbeitertabelle des jeweiligen Unternehmens.<\/p>\n
Wenn Sie die Datenbank als Bibliotheksdatenbank zusammen mit einer anderen Datenbank weitergeben möchten, gehen Sie mit einem entsprechenden Setup sicher. Wie Sie ein solches Setup erstellen, erfahren Sie im Beitrag Setup-Erstellung mit Inno Setup in der aktuellen Ausgabe.<\/p>\n","protected":false},"excerpt":{"rendered":"
Das Sicherheitssystem von Access bietet die Möglichkeit, Benutzer und Benutzergruppen zu verwalten und deren Berechtigungen an den einzelnen Objekten der Access-Datenbank festzulegen. Die Verwal-tung der Berechtigungen erfolgt in zwei Dialogen, die über die Menüleiste geöffnet werden können. Leider haben diese Dialoge Nachteile – sie stehen z. B. in der Runtime-Version nicht zur Verfügung und sind nicht anpassbar. Im folgenden Beitrag erfahren Sie, wie Sie dem Anwender eine maßgeschneiderte und immer verfügbare Benutzerverwaltung zur Verfügung stellen.<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"om_disable_all_campaigns":false,"_monsterinsights_skip_tracking":false,"_monsterinsights_sitenote_active":false,"_monsterinsights_sitenote_note":"","_monsterinsights_sitenote_category":0,"_uf_show_specific_survey":0,"_uf_disable_surveys":false,"footnotes":""},"categories":[662003,66032003,44000028,44000038],"tags":[],"class_list":["post-55000107","post","type-post","status-publish","format-standard","hentry","category-662003","category-66032003","category-Ergonomie_und_Benutzeroberflaeche","category-Sicherheit"],"yoast_head":"\n
Benutzer mit Access verwalten - Access im Unternehmen<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/\" \/>\n<meta property=\"og:locale\" content=\"de_DE\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"Benutzer mit Access verwalten\" \/>\n<meta property=\"og:description\" content=\"Das Sicherheitssystem von Access bietet die Möglichkeit, Benutzer und Benutzergruppen zu verwalten und deren Berechtigungen an den einzelnen Objekten der Access-Datenbank festzulegen. Die Verwal-tung der Berechtigungen erfolgt in zwei Dialogen, die über die Menüleiste geöffnet werden können. Leider haben diese Dialoge Nachteile - sie stehen z. B. in der Runtime-Version nicht zur Verfügung und sind nicht anpassbar. Im folgenden Beitrag erfahren Sie, wie Sie dem Anwender eine maßgeschneiderte und immer verfügbare Benutzerverwaltung zur Verfügung stellen.\" \/>\n<meta property=\"og:url\" content=\"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/\" \/>\n<meta property=\"og:site_name\" content=\"Access im Unternehmen\" \/>\n<meta property=\"article:published_time\" content=\"2020-05-06T15:17:25+00:00\" \/>\n<meta property=\"og:image\" content=\"http:\/\/vg05.met.vgwort.de\/na\/001286173a954420a4e0402d23efdc99\" \/>\n<meta name=\"author\" content=\"Andr\u00e9 Minhorst\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Verfasst von\" \/>\n\t<meta name=\"twitter:data1\" content=\"Andr\u00e9 Minhorst\" \/>\n\t<meta name=\"twitter:label2\" content=\"Gesch\u00e4tzte Lesezeit\" \/>\n\t<meta name=\"twitter:data2\" content=\"22\u00a0Minuten\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\\\/\\\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Benutzer_mit_Access_verwalten\\\/#article\",\"isPartOf\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Benutzer_mit_Access_verwalten\\\/\"},\"author\":{\"name\":\"Andr\u00e9 Minhorst\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/person\\\/13395c4bcd7d7963efe33be9c584d93f\"},\"headline\":\"Benutzer mit Access verwalten\",\"datePublished\":\"2020-05-06T15:17:25+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Benutzer_mit_Access_verwalten\\\/\"},\"wordCount\":3797,\"commentCount\":0,\"publisher\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Benutzer_mit_Access_verwalten\\\/#primaryimage\"},\"thumbnailUrl\":\"http:\\\/\\\/vg05.met.vgwort.de\\\/na\\\/001286173a954420a4e0402d23efdc99\",\"articleSection\":[\"2003\",\"3\\\/2003\",\"Ergonomie und Benutzeroberfl\u00e4che\",\"Sicherheit\"],\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"CommentAction\",\"name\":\"Comment\",\"target\":[\"https:\\\/\\\/access-im-unternehmen.de\\\/Benutzer_mit_Access_verwalten\\\/#respond\"]}]},{\"@type\":\"WebPage\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Benutzer_mit_Access_verwalten\\\/\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Benutzer_mit_Access_verwalten\\\/\",\"name\":\"Benutzer mit Access verwalten - Access im Unternehmen\",\"isPartOf\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#website\"},\"primaryImageOfPage\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Benutzer_mit_Access_verwalten\\\/#primaryimage\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Benutzer_mit_Access_verwalten\\\/#primaryimage\"},\"thumbnailUrl\":\"http:\\\/\\\/vg05.met.vgwort.de\\\/na\\\/001286173a954420a4e0402d23efdc99\",\"datePublished\":\"2020-05-06T15:17:25+00:00\",\"breadcrumb\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Benutzer_mit_Access_verwalten\\\/#breadcrumb\"},\"inLanguage\":\"de\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\\\/\\\/access-im-unternehmen.de\\\/Benutzer_mit_Access_verwalten\\\/\"]}]},{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Benutzer_mit_Access_verwalten\\\/#primaryimage\",\"url\":\"http:\\\/\\\/vg05.met.vgwort.de\\\/na\\\/001286173a954420a4e0402d23efdc99\",\"contentUrl\":\"http:\\\/\\\/vg05.met.vgwort.de\\\/na\\\/001286173a954420a4e0402d23efdc99\"},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/Benutzer_mit_Access_verwalten\\\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Benutzer mit Access verwalten\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#website\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\",\"name\":\"Access im Unternehmen\",\"description\":\"Das Magazin f\u00fcr Datenbankentwickler auf Basis von Microsoft Access\",\"publisher\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\\\/\\\/access-im-unternehmen.de\\\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"de\"},{\"@type\":\"Organization\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#organization\",\"name\":\"Andr\u00e9 Minhorst Verlag\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/\",\"logo\":{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/logo\\\/image\\\/\",\"url\":\"https:\\\/\\\/access-im-unternehmen.de\\\/wp-content\\\/uploads\\\/2019\\\/09\\\/aiu_wp.png\",\"contentUrl\":\"https:\\\/\\\/access-im-unternehmen.de\\\/wp-content\\\/uploads\\\/2019\\\/09\\\/aiu_wp.png\",\"width\":370,\"height\":111,\"caption\":\"Andr\u00e9 Minhorst Verlag\"},\"image\":{\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/logo\\\/image\\\/\"}},{\"@type\":\"Person\",\"@id\":\"https:\\\/\\\/access-im-unternehmen.de\\\/#\\\/schema\\\/person\\\/13395c4bcd7d7963efe33be9c584d93f\",\"name\":\"Andr\u00e9 Minhorst\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"de\",\"@id\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"url\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"contentUrl\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g\",\"caption\":\"Andr\u00e9 Minhorst\"}}]}<\/script>\n<!-- \/ Yoast SEO Premium plugin. -->","yoast_head_json":{"title":"Benutzer mit Access verwalten - Access im Unternehmen","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/","og_locale":"de_DE","og_type":"article","og_title":"Benutzer mit Access verwalten","og_description":"Das Sicherheitssystem von Access bietet die Möglichkeit, Benutzer und Benutzergruppen zu verwalten und deren Berechtigungen an den einzelnen Objekten der Access-Datenbank festzulegen. Die Verwal-tung der Berechtigungen erfolgt in zwei Dialogen, die über die Menüleiste geöffnet werden können. Leider haben diese Dialoge Nachteile - sie stehen z. B. in der Runtime-Version nicht zur Verfügung und sind nicht anpassbar. Im folgenden Beitrag erfahren Sie, wie Sie dem Anwender eine maßgeschneiderte und immer verfügbare Benutzerverwaltung zur Verfügung stellen.","og_url":"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/","og_site_name":"Access im Unternehmen","article_published_time":"2020-05-06T15:17:25+00:00","og_image":[{"url":"http:\/\/vg05.met.vgwort.de\/na\/001286173a954420a4e0402d23efdc99","type":"","width":"","height":""}],"author":"Andr\u00e9 Minhorst","twitter_card":"summary_large_image","twitter_misc":{"Verfasst von":"Andr\u00e9 Minhorst","Gesch\u00e4tzte Lesezeit":"22\u00a0Minuten"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/#article","isPartOf":{"@id":"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/"},"author":{"name":"Andr\u00e9 Minhorst","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/person\/13395c4bcd7d7963efe33be9c584d93f"},"headline":"Benutzer mit Access verwalten","datePublished":"2020-05-06T15:17:25+00:00","mainEntityOfPage":{"@id":"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/"},"wordCount":3797,"commentCount":0,"publisher":{"@id":"https:\/\/access-im-unternehmen.de\/#organization"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/#primaryimage"},"thumbnailUrl":"http:\/\/vg05.met.vgwort.de\/na\/001286173a954420a4e0402d23efdc99","articleSection":["2003","3\/2003","Ergonomie und Benutzeroberfl\u00e4che","Sicherheit"],"inLanguage":"de","potentialAction":[{"@type":"CommentAction","name":"Comment","target":["https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/#respond"]}]},{"@type":"WebPage","@id":"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/","url":"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/","name":"Benutzer mit Access verwalten - Access im Unternehmen","isPartOf":{"@id":"https:\/\/access-im-unternehmen.de\/#website"},"primaryImageOfPage":{"@id":"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/#primaryimage"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/#primaryimage"},"thumbnailUrl":"http:\/\/vg05.met.vgwort.de\/na\/001286173a954420a4e0402d23efdc99","datePublished":"2020-05-06T15:17:25+00:00","breadcrumb":{"@id":"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/#breadcrumb"},"inLanguage":"de","potentialAction":[{"@type":"ReadAction","target":["https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/"]}]},{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/#primaryimage","url":"http:\/\/vg05.met.vgwort.de\/na\/001286173a954420a4e0402d23efdc99","contentUrl":"http:\/\/vg05.met.vgwort.de\/na\/001286173a954420a4e0402d23efdc99"},{"@type":"BreadcrumbList","@id":"https:\/\/access-im-unternehmen.de\/Benutzer_mit_Access_verwalten\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/access-im-unternehmen.de\/"},{"@type":"ListItem","position":2,"name":"Benutzer mit Access verwalten"}]},{"@type":"WebSite","@id":"https:\/\/access-im-unternehmen.de\/#website","url":"https:\/\/access-im-unternehmen.de\/","name":"Access im Unternehmen","description":"Das Magazin f\u00fcr Datenbankentwickler auf Basis von Microsoft Access","publisher":{"@id":"https:\/\/access-im-unternehmen.de\/#organization"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/access-im-unternehmen.de\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"de"},{"@type":"Organization","@id":"https:\/\/access-im-unternehmen.de\/#organization","name":"Andr\u00e9 Minhorst Verlag","url":"https:\/\/access-im-unternehmen.de\/","logo":{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/logo\/image\/","url":"https:\/\/access-im-unternehmen.de\/wp-content\/uploads\/2019\/09\/aiu_wp.png","contentUrl":"https:\/\/access-im-unternehmen.de\/wp-content\/uploads\/2019\/09\/aiu_wp.png","width":370,"height":111,"caption":"Andr\u00e9 Minhorst Verlag"},"image":{"@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/logo\/image\/"}},{"@type":"Person","@id":"https:\/\/access-im-unternehmen.de\/#\/schema\/person\/13395c4bcd7d7963efe33be9c584d93f","name":"Andr\u00e9 Minhorst","image":{"@type":"ImageObject","inLanguage":"de","@id":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","url":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/1b9d010cf1716692cb9c34f21554e07d17d461acaea5b61b8cb21cbec678d48a?s=96&d=mm&r=g","caption":"Andr\u00e9 Minhorst"}}]}},"_links":{"self":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts\/55000107","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/comments?post=55000107"}],"version-history":[{"count":0,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/posts\/55000107\/revisions"}],"wp:attachment":[{"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/media?parent=55000107"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/categories?post=55000107"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/access-im-unternehmen.de\/data\/wp\/v2\/tags?post=55000107"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}