Benutzerzugriffe mitloggen

[DaSilva 10]

Ich möchte gerne wissen welche Benutzer alle derzeit auf ein paar bestimmte Windows 2003 Server zugreifen.

Die Logmöglichkeiten von Windows sind mir zu unübersichtlich bzw. zu aufwendig auszuwerten.

Gibt es ein Program / Dienst das / den man installieren kann und die Benutzerzugriffe mitloggt?

Danke für Hilfe.

[Dr.Melzer 191]

Was genau willst du denn mitloggen und mit welchem Ziel?

[Lian 2.658]

Vielleicht reicht Dir die Anzeige der Sitzungen und Geöffneten Dateien?

 

Start > Ausführen > compmgmt.msc > Freigegebene Ordner > Sitzungen oder Geöffnete Dateien

[DaSilva 10]

Ich möchte ja nicht dauernd aktiv davor sitzen sondern nach ca. einer Woche einfach nur die Zugriffe (die bis dahin protokolliert wurden) ansehen und auswerten.

[Lian 2.658]

Dann bietet Dir Auditing das was Du suchst. Man muss sich halt damit beschäftigen...

 

Selbst einige Drittanbietertools, die ich kenne, setzen auch nur darauf auf.

 

Microsoft TechNet: Windows Server 2003 Auditing

[DaSilva 10]

Hmm, hab mir jetzt ein bisschen dazu angelesen aber schlau daraus bin ich nicht geworden.

Sind damit die Windowsbordmittel gemeint oder gibt es das als Download?

Finde nirgendwo klare Befehle oder Tutorials zum Aktivieren, immer nur zur ungefähren Verfahrensweise und Features.

[DaSilva 10]

Ich habe jetzt folgendes VBS-Script gefunden:

 

SET MyShell = Wscript.CreateObject("Wscript.Shell")
Set MyFiles = CreateObject("Scripting.FileSystemObject")
set Env=MyShell.Environment("PROCESS")
temp=Env("TEMP") & "\NetFiles.tmp"
set liste=MyFiles.Createtextfile("C:\Tools\FreigabenLoggen\freigabenlog.TXT")

intervall=10 'Sekunden
dauer=inputbox("Wie lange soll das Protokoll laufen? (in Stunden)","Protokoll der Zetzzugriffe")
dauer=dauer * 3600 / intervall
intervall=intervall*1000 'Millisekunden

FileID=0

for n=1 to dauer
wscript.sleep(intervall)
myshell.run "cmd.exe /c net.exe Files > %temp%\netfiles.tmp",0,TRUE
set tempfile=MyFiles.Opentextfile(temp)
do
	zeile=tempfile.readline
	if instr(zeile, ":\") then
		if trim(left(zeile,7)) > FileID then
			'liste.writeline "------------------------------------------------------------------------------------------------"
			if instr(zeile, "d:\") then
			  liste.writeline date() & ", " & time() & "  " & zeile
			  FileID = trim(left(zeile,7))
			end if 
		end if
	end if
loop until tempfile.AtEndOfStream
next

set tempfile=MyFiles.GetFile(temp)
tempfile.delete
myshell.run "notepad.exe c:\temp\freigabentemp.txt"

 

Das Ergebnis sieht dann so aus:

 

15.05.2008, 13:05:52 220671222 d:\share ROEME04 0

15.05.2008, 13:05:52 220671425 d:\share WES18 0

15.05.2008, 13:05:52 220671526 d:\home\roeme04\Normal.dot ROEME04 0

15.05.2008, 13:05:52 220671934 d:\home\meie10\msmail\meie10.pst MEIE10 5

 

Wie man deutlich sieht werden allerdings mehrere Einträge eines Benutzers angezeigt (hier im Beispiel "ROEME04").

Da ich aber nur Interesse daran habe, dass ich nach einigen Tagen weiß wer alles auf die Freigaben zugegriffen hat, würde es mir reichen wenn es nur immer einen Eintrag pro User geben würde.

Wie kann ich das realisieren?

Danke für Hilfe.