Listing 1: DisableWpaNotification.vbs

Set wpaColl = GetObject("winmgmts://./root/cimv2"). _
  InstancesOf("Win32_WindowsProductActivation")
For Each wpa in wpaColl
' BEGIN CALLOUT A
  wpa.SetNotification 0
' END CALLOUT A
Next