Probleme beim Auslesen des Eventlog

Mitglied: Shadow377

Shadow377 (Level 1) - Jetzt verbinden

21.07.2006 um 11:34 Uhr, 7488 Aufrufe

Hallo
ich will mit folgendem Skript das Windows Eventlog auslesen und ausgeben, um es anschließend weiterzuverarbeiten:

eventlog.vbs
strComputer = "."

Set objSWbemServices = GetObject("winmgmts:\\" & strComputer)
Set colSWbemObjectSet = objSWbemServices.InstancesOf("Win32_NTLogEvent")

For Each objSWbemObject In colSWbemObjectSet

tag = Mid(objSWbemObject.TimeGenerated, 7, 2)
mon = Mid(objSWbemObject.TimeGenerated, 5, 2)
jahr = Left(objSWbemObject.TimeGenerated, 4)
std = Mid(objSWbemObject.TimeGenerated, 9, 2)
min = Mid(objSWbemObject.TimeGenerated, 11, 2)
sec = Mid(objSWbemObject.TimeGenerated, 13, 2)

Wscript.Echo objSWbemObject.LogFile &vbtab & objSWbemObject.RecordNumber &vbtab & objSWbemObject.Type &vbtab &tag & "." &mon & "." & jahr &vbtab & std & ":" & min & ":" & sec &vbtab & objSWbemObject.SourceName &vbtab & objSWbemObject.User &vbtab & objSWbemObject.ComputerName &vbtab & objSWbemObject.Message

Next



Dabei gibt es allerdings leider folgende Probleme:
1)Das Securitylog wird nicht ausgelesen
2)Unter Windows 2000 gibt es sehr starke Performanceprobleme: Die Einträge werden mit fortschreitender Dauer immer langsamer ausgelesen und auch die CPU-Auslastung ist nicht merklich höher als im Leerlauf (unter W2003 Server und XP habe ich eine Auslastung von ca 100% und einen, von der CPU-Geschwindigkeit und Eventloggröße abhängig, relativ schnellen Export; bei Windows 2000 allerdings hatte ich nach 50 min gerade mal 350kb Exportiert, unter 2003 Server dagegen ca 30mb/min)

Ausgeführt wird das ganze in einer batch-Datei mit dem Befehl cscript eventlog.vbs>eventlog_temp.txt

[edit]Kann mir niemand weiterhelfen??[/edit]
Heiß diskutierte Inhalte
Windows 10
Windows 10 Geschwindigkeitprobleme trotz viel mehr Gb Ram
Matthes88Vor 13 StundenFrageWindows 1036 Kommentare

Hallo ihr lieben aaaalso : Da mein neuer Arbeitsspeicher (32gb) von meiner alten Windows 7 version (max mit 8gb kompatibel) nicht angenommen wurde, habe ...

Off Topic
Realistische Gehaltsvorstellung für eine "IT-Allroundkraft"
gelöst JiggyLeeVor 8 StundenFrageOff Topic16 Kommentare

Hallo an alle, ich hege momentan den Wunsch mich von der alten verstaubten Behörden Bürokratie und langweiliger Aufgaben los zu lösen und in einem ...

Windows Userverwaltung
Account Aktivierung über VPN
Phill93Vor 1 TagFrageWindows Userverwaltung3 Kommentare

Hallo, ich muss mir für eine RDP Umgebung für einen Verein eine Lösung für die Account Aktivierung ausdenken. Meine Idee ist die folgende: 1. ...

Switche und Hubs
Suche Deutsche Sprachdatei für D-Link DGS-1210-24 D1 Switch
gelöst Oggy01Vor 1 TagFrageSwitche und Hubs8 Kommentare

Hallo, ich habe einen D-Link DGS-1210-24 Vers. D1 Switch bekommen und suche für diesen eine Deutsche Sprachdatei. Die Firmware ist auf dem aktuellen Stand ...

Humor (lol)
Tipp: Dinge, die man besser nicht klaut
altmetallerVor 10 StundenTippHumor (lol)8 Kommentare

Hallo, so wurde meiner Hündin z.B. heute der (eingeschaltete) GPS-Tracker mit Mobilfunkanbindung quasi "direkt vom Halsband weggefunden". Akku hatte noch 60% :-P Und ich ...

Video & Streaming
Videoaufnahme funktioniert nur bis zum ersten Reboot (0x80040217)
IllusionFACTORYVor 1 TagFrageVideo & Streaming10 Kommentare

Ich nehme über eine Video-Software von einem USB-Hardware-Encoder Video auf. Das funktioniert exakt bis zum ersten Reboot - danach bekomme ich beim Starten der ...

Windows Server
GPU Passthrough HYPER-V 2019
bintesVor 1 TagFrageWindows Server7 Kommentare

Hallo, ich habe ein ein Problem mit der Bereitstellung einer Grafikkarte an eine virtuelle Maschine. Hardware: - HPE ProLiant DL380 Gen9 V4 Rack Server ...

Windows Server
Windows Admin Center DC
maximidVor 1 TagFrageWindows Server3 Kommentare

Hallo, ich hätte mal eine Frage zu Windows Admin Center und zwar schaue ich es mir aktuell etwas an da mir die zentrale Verwaltung ...