Hallo zusammen,
in meiner Anwendung wird die Benutzerverwaltung aus einem Formular über einen Button (im Click-Ereignis) geöffnet:
DoCmd.RunCommand acCmdUserAndGroupAccounts
Falls dort ein neuer Benutzer eingetragen wurde, soll dieser weiter verarbeitet werden, also muss ich irgendwie an den Namen herankommen.
Es wäre mir schon geholfen, wenn ich die Liste aller Benutzer (incl. des neu eingegebenen) aus der mdw hätte.
Das habe ich mit folgender Funktion versucht, die ich direkt nach dem o. g. RunCommand ausführe:
Function ListUsersInSystem()
Dim ws As Workspace
Dim i As Integer
Set ws = DBEngine.Workspaces(0)
For i = 0 To ws.Users.Count - 1
Debug.Print ws.Users(i).Name
Next i
Set ws = Nothing
End Function
Hierbei wird der neu eingegebene User allerdings nicht angezeigt.
Hat jemand eine Idee, woran das liegen könnte bzw. was ich dagegen unternehmen kann?
Die DB ist im Format 2003, Entwicklungsoberfläche ist Acc 2010.
Vielen Dank im Voraus für alle Ideen und viele Grüße
Julia
