17 lines
358 B
Plaintext
17 lines
358 B
Plaintext
|
|
|
|
Set S = GetObject("winmgmts:root/emm")
|
|
|
|
Set E = S.ExecQuery( "SELECT * FROM Microsoft_EELEntry", "WQL", 48 ) ' WHERE LoggingTime < '20000402000000.000000+000'", "WQL", 0x20 )
|
|
|
|
NumDeleted = 0
|
|
|
|
for each Obj in E
|
|
S.Delete Obj.Path_
|
|
NumDeleted = NumDeleted + 1
|
|
next
|
|
|
|
|
|
WScript.echo ("Num deleted : ")
|
|
WScript.echo (NumDeleted)
|