Office: (Office 2000) Aktive User auslesen

Hallochen

habe eine ACCESS2000 mdb die ich unter ACCESS2007 betreibe.Datenbank ist als Frontend / Backend Datenbank aufgebaut.

Bestimmte Aktionen z.B. Erstellen einer Zahlungsdatei, die von einem bestimmten Formular aus gestartet werden, sollen nur möglich sein, wenn nur der momentan agierende Benutzer angemeldet ist.

Wie könnte ich das steuern? Gibt es eine Möglichkeit alle angemeldeten User an der Backend Datenbank zu ermitteln. Meinen eigenen PC und meinen Anmeldenamen am AD ermittle ich über eine API Funktion das ist kein Problem.

Danke

:)

 

Hallo

Code:

Resultat:

Beispiel 1 (CompName(1)) (User) = Lanz Rudolf
Beispiel 2 (CompName(2)) (Comp) = LARU001


Das gleiche erhält man mit:

Environ("Username") =Rudolf Lanz
Environ("Computername") =LARU001

 

Hallochen Rudolf

vielen Dank. Aber wohin lese ich die Daten aus? Ich brauche ja dann vermutlich irgendwo ein Formular etc., wo ich dann wieder weiter agieren muss um dann zu sagen, wenn mehr als der aktiver User anmgeldet sind, darf sich z.b. das Aktionsformular gar nicht öffnen?

Danke

Resultat:

Beispiel 1 (CompName(1)) (User) = Lanz Rudolf
Beispiel 2 (CompName(2)) (Comp) = LARU001


Das gleiche erhält man mit:

Environ("Username") =Rudolf Lanz
Environ("Computername") =LARU001

 

Hallo
Definiere irgend wo am besten in einem Modul
z.B.: sowas:
Option Compare Database
Option Explicit
Public AktivUser As string
Public AktivPC As String

in einem Formular/Bericht kannst Du es so verwenden:
ME!Benuzer = AktivUser

 

Hi,

Ihr redet aneinander vorbei.
Den Computer-User ermitteln kann habibi ja offenbar ("API") schon.
Er will die User, die das Backend geöffnet haben.
Das aber steht hier:
http://www.ms-office-forum.net/forum...d.php?t=219905

Ciao, Sascha