Benutzer auflisten

[lukyluke68]

Hallo,

Ich möchte mir als Admin anzeigen lassen, welche Benutzer gerade Zugriff also online mit der Datenbank verbunden sind.
Da jeder auf seinem PC mit seiner Personalnummer bei uns als QNummer bekannt angemeldet ist, müsste ich ihn doch auslesen können? Jede QNummer ist in der Tabelle Personal_tab dem Namen zugewiesen.

[MzKlMu]

Hallo,
die Benutzer kannst Du aus der Ldb (bei einer Mdb) oder der acclb (?) auslesen. Das ist eine einfache Textdatei die man mit dem Editor ansehen und bei Bedarf auch auslesen kann. Diese LB Files werden automatisch beim Start von Access angelegt.

[DF6GL]

Hallo,

die ldb-Datei ist für solche Prüfungen eher nicht geeignet, weil nach dem Ausloggen eines Anwenders (Beenden der Applikation) sein Eintrag nicht entfernt wird.


Besser:

http://dbwiki.net/wiki/VBA_Tipp:_Aktuelle_Benutzer_ermitteln

[MzKlMu]

Hallo,
war mir nicht bewusst, danke für den Hinweis.

[lukyluke68]

Hallo Franz,

Gibt es hierzu vielleicht eine Bsp.datei?

[database]

Hallo,

sorry, wozu brauchst du eine Bsp.datei?

erstelle in einer neuen DB einfach ein Standardmodul und kopiere den Code aus dem Link von Franz dorthin.
Danach rufst du im Direktfenster die Prozedur so auf wie es im Artikel beschrieben wurde - fertig.

Beachte aber, dass du die aktuell geöffnete DB nicht abfragen kannst sondern nur eine, auf deinem Rechner nicht geöffnete.

Der Code aus dem DBWiki wurde für *.mdb - Dateien geschrieben, wenn du eine *.accdb (Access 2007/2010) abfragen möchtest, dann ersetze im Code vom DBWiki diese Zeile:

cn.Provider = "Microsoft.ACE.OLEDB.12.0"

HTH

[lukyluke68]

Hallo,

habe eine neue DB erstellt und in ein neues Modul den Code mit der Änderung cn.Provider = "Microsoft.ACE.OLEDB.12.0" eingefügt.
Im Direktfenster habe ich wie im Link den Code kopiert.

Und dann?

Ich hänge total.

[database]

Hi,

na dann gibst du so wie im DBWiki-Beispiel ein ...

ShowUserRosterMultipleUsers "X:\DeineDatenbank.accdb"

und drückst ENTER

[lukyluke68]

Hallo,

was mache ich hier noch falsch?

[DF6GL]

Hallo,

vermutlich ist der Verweis auf die ADODB-Library nicht gesetzt..

[lukyluke68]

Hallo,

und wie kann man de Verweis hier setzen?

[DF6GL]

Hallo,

VBA-Editor/Menüleiste/Extras/Verweise....

[lukyluke68]

Hallo,

ich kann in den vielen Verweisen diesen Eintrag zum aktivieren ADODB-Library nicht finden. Hat der hier einen anderen Namen?

[DF6GL]

Hallo,

eine von diesen austesten..

[lukyluke68]

Hallo Franz,

das hat jetzt geklappt. Im Fenster zeigt es mir jetzt an, wer die Datenbank gerade geöffnet hat.
Ich kann aber dieses Modul, nicht in mein FE intergrieren und es als Admin starten?
Wie bereits beschrieben wurde, anscheinend nur in einer extra erstellten