MASM32 Downloads
I don't want the DOS windows to show.
strComputer = "."Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate,(Backup)}!\\" & _ strComputer & "\root\cimv2")Set colLogFiles = objWMIService.ExecQuery _ ("SELECT * FROM Win32_NTEventLogFile WHERE LogFileName='Application'")For Each objLogfile in colLogFiles objLogFile.ClearEventLog()Next