Ereignisanzeige automatisch löschen

rem Dies ist ein Script um eine Ereignisanzeige zu exportieren, in eine .txt zu speichern und anschließend die Ereignisanzeige zu löschen
rem Dieses Script muss auf dem Rechner selbst ausgeführt werden!
rem --!! vor dem ersten Start unbedingt die Variablen anpassen !!--

rem Variablen
rem Name der Ordner und Dateien die erstellt werden, dass Datum wird angehängt
set Dateiname=Eventlog
rem Name des Rechners auf dem die Eventlogs exportiert und gelöscht werden sollen("PC-Name")  
set Rechner="PC-Name"  

rem Filter setzen
rem nur die Einträge dieses Benutzers anzeigen (Domäne\Benutzername)
set User=Benutzername
rem Welche Ereignisanzeige soll exportiert werden? (Sicherheit=Security, Anwendung=Application, System=System) ('Name des Ereignisprotokolls')  
set Ereignis=Security

rem Pfad zum Speicherort festlegen (Bsp: C:\Eventlogs\ oder \\Computername\Freigabe\)
set Speichern=C:\

rem Filtern und eportieren der Ereignisanzeige in eine .txt
cscript c:\windows\system32\eventquery.vbs /fi "user eq %User%" /fi "source eq %Ereignis%" /v /fo list >> %Dateiname%.txt  


rem Dateinameiablen für Tag/Monat/Jahr erstellen
set jahr=%date:~-4%
set monat=%date:~-7,2%
set tag=%date:~-10,2%

rem die durch das cscript erstellte .txt Datei umbenennen
ren %Dateiname%.txt %Dateiname%_%tag%_%monat%_%jahr%.txt

rem die erstellte .txt Datei auf einen anderen Rechner verschieben und in einen Ordnerstruktur mit Jahr/Montag+Jahr speichern
md %Speichern%\%Dateiname%_%jahr%
md %Speichern%\%Dateiname%_%jahr%\%Dateiname%_%monat%_%jahr%
move %Dateiname%_%tag%_%monat%_%jahr%.txt %Speichen%\%Dateiname%_%jahr%\%Dateiname%_%monat%_%jahr%\%Dateiname%_%tag%_%monat%_%jahr%.txt

rem die Ereignisanzeige löschen
rem wmic /node:%Rechner% nteventlog where "Logfilename=%Ereignis%" call ClearEventLog