Mig veterligt, rätta mig gärna någon, så kan man inte ta bort en enstaka post ur loggen, utan det närmaste man kommer i såfall är att rotera hela loggen ....
/M
2 svar · 177 visningar · startad av henrikjohansson
Jag sitter och gör ett script som sparar hur många sidor varje person på nätverket har skrivigt ut och använder denna koden
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colLoggedEvents = objWMIService.ExecQuery _
("Select * from Win32_NTLogEvent Where Logfile = 'System' AND EventCode = 10")
For Each objEvent in colLoggedEvents
Meddelande = objEvent.Message
ASidor = getPages(Meddelande)
objRecordset.AddNew
objRecordset("Person") = objEvent.User
objRecordset("AntalSidor") = aSidor
objRecordset.Update
Next
Det fungerar bra..
Men jag vill även att det som jag sparar i databasen skall tas bort ur loggen för det skall inte räknas mer än en gång, hur skall jag göra det lättast?
tänkte bara tillägga också att jag vill ha en ny post i databasen för varje utskrift efterom det även skall vara loggat med dator och skrivare osv.
Mig veterligt, rätta mig gärna någon, så kan man inte ta bort en enstaka post ur loggen, utan det närmaste man kommer i såfall är att rotera hela loggen ....
/M
ok.. då får jag logga datum och tid också. så jag har något att jämföra med så det inte läggs in två gånger.