[W2K3] Script om logon & logoff te loggen werkt niet.

[Verwijderd]

Beste, ik gebruik het volgende script om het aan- en afmelden van een User te loggen. Maar de echo wordt wel weergegeven, en het script wordt wel uitgevoerd, maar er wordt geen log aangemaakt... iemand raad?

LogOnLog.vbs

VBScript:

On Error Resume Next
Set objNetwork = wscript.CreateObject("Wscript.Network")
Set objFSO = Wscript.CreateObject("Scripting.FileSystemObject")

set objTextFile = objFSO.OpenTextFile("\\SERVER2\LoginReports$\" & objNetwork.Username & "Usage.csv",8,True)
Set objShell = CreateObject("WScript.Shell")
objTextFile.WriteLine year(date()) & "-" & month(date()) & "-" & day(date()) & "," & time() & ",Login," & objNetwork.Username & "," & objNetwork.ComputerName
wscript.echo "Volgende gegevens zijn weggeschreven in de databank: " & vbCr & vbLf & vbCr & vbLf & "Gebruiker: " & objNetwork.Username & vbCr & vbLf & "Datum: " & objTextFile.WriteLine & year(date()) & "-" & month(date()) & "-" & day(date()) & vbCr & vbLf & "Tijd: " & time() & vbCr & vbLf & "Computer: " & objNetwork.ComputerName
objTextFile.close 

LogoutLog.vbs

VBScript:

On Error Resume Next
Set objNetwork = Wscript.CreateObject("Wscript.Network")
Set objFSO = Wscript.CreateObject("Scripting.FileSystemObject")

set objTextFile = objFSO.OpenTextFile("\\SERVER2\LoginReports$\" & objNetwork.Username & "Usage.csv",8,True)
objTextFile.WriteLine year(date()) & "-" & month(date()) & "-" & day(date()) & "," & time() & ",Logout," & objNetwork.Username & "," & objNetwork.ComputerName
objTextFile.close xt

Het script komt van op: http://s22jgs.wordpress.com/2009/03/22/audit-login-and-logout-events-using-login-scripts

Ik heb ook al geprobeerd om de bestanden op te slaan in een .txt, maar het werkt nog altijd niet... Iedereen heeft Full Controll op de share...
Ook in Eventviewer is niets te zien...

kan iemand me helpen?
groeten

[BtM909]

Haal die On Error Resume Next eens weg en kijk wat voor foutmeldingen je dan krijgt

[Verwijderd]

Dan krijg ik de error: Path Not found.
regel 4
teken 1
de share bestaat nogtans...

[Verwijderd]

Ondertussen is het opgelost!
Er zat een schrijffout in de sharenaam...
Ik heb die naam nogtans 100 keer gecheckt...

Mag slotje op.

[Razwer]

als je je sharenaam een variable maakt, kun je het script ook nog eens simpel aanpassen mocht je server veranderen zonder dat je alle regels hoeft aan te passen.

edit:

en ipv & vbCr & vbLf kun je ook gewoon vbCrLf gebruiken

[ Voor 18% gewijzigd door Razwer op 05-11-2009 15:44 ]

[Verwijderd]

merci ;-)