Solved Event Log Error - Source: WMI Event ID: 10

[Wirezfree]

Hello,

A new clean install of Windows 7 Pro on Intel NUC i5/8GB. Trying to clear some event log errors.
I have one particular error:

Source: WMI Event ID: 10
Event filter with query "SELECT * FROM __InstanceModificationEvent WITHIN 60 WHERE TargetInstance
ISA "Win32_Processor" AND TargetInstance.LoadPercentage > 99" could not be reactivated in namespace
"//./root/CIMV2" because of error 0x80041003. Events cannot be delivered through this filter until the problem is corrected.


After Googling Reading I found references to fix this with a .vbs script... But they have 2 different scripts
I'm not sure if they are the same..?? I don't understand the code...

Any guidance welcome... Thanks

Fix Script 1

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" _
& strComputer & "\root\subscription")

Set obj1 = objWMIService.Get("__EventFilter.Name='BVTFilter'")

set obj2set = obj1.Associators_("__FilterToConsumerBinding")

set obj3set = obj1.References_("__FilterToConsumerBinding")

For each obj2 in obj2set
                WScript.echo "Deleting the object"
                WScript.echo obj2.GetObjectText_
                obj2.Delete_
next

For each obj3 in obj3set
                WScript.echo "Deleting the object"
                WScript.echo obj3.GetObjectText_
                obj3.Delete_
next

WScript.echo "Deleting the object"
WScript.echo obj1.GetObjectText_
obj1.Delete_

next

Fix Script 2

strComputer = "."

Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" _
& strComputer & "\root\subscription")

Set obj1 = objWMIService.ExecQuery("select * from __eventfilter where name='BVTFilter' and query='SELECT * FROM __InstanceModificationEvent WITHIN 60 WHERE TargetInstance ISA ""Win32_Processor"" AND TargetInstance.LoadPercentage > 99'")

For Each obj1elem in obj1

set obj2set = obj1elem.Associators_("__FilterToConsumerBinding")

set obj3set = obj1elem.References_("__FilterToConsumerBinding")

For each obj2 in obj2set

WScript.echo "Deleting the object"

WScript.echo obj2.GetObjectText_

obj2.Delete_

next

For each obj3 in obj3set

WScript.echo "Deleting the object"

WScript.echo obj3.GetObjectText_

obj3.Delete_

next

WScript.echo "Deleting the object"

WScript.echo obj1elem.GetObjectText_

obj1elem.Delete_

Next

 

[torchwood]

Hi

Dont worry its a known MS bug.
No problems are caused by it - just the stupid event error.


Roy

 

[Wirezfree]

Hi

Dont worry its a known MS bug.
No problems are caused by it - just the stupid event error.

Roy

Hi,

Thanks.. I read it does not cause an issue...
Being somewhat OCD, would be nice to clear them

Hence the request for help in clearing them, hopefully by one of the scripts above...

Cheers

 

[Wirezfree]

Hi..

I just followed the MS Fix for this... It was updated 15th March 2019... No more Error

https://support.microsoft.com/en-gb...the-application-log-after-you-install-service

 

[Snick]

Hi Wirezfree,
Thank you for posting your resolution. Please mark your thread as resolved.
Happy Computing!