Returns information about event log settings (such as maximum log size) assigned by using Group Policy
Set objWMIService = GetObject _("winmgmts:\\" & strComputer & "\root\rsop\computer")Set colItems = objWMIService.ExecQuery _("Select * from RSOP_SecurityEventLogSettingNumeric")For Each objItem in colItemsWscript.Echo "Key Name: " & objItem.KeyNameWscript.Echo "Precedence: " & objItem.PrecedenceWscript.Echo "Setting: " & objItem.SettingWscript.Echo "Type: " & objItem.TypeWscript.EchoNext
This is a VB Script, this can be used by saving the file in .vbs file