Sub QueryPackageStatus (connection)

	Dim query
	Dim sink
	Dim minutes


	Set sink = WScript.CreateObject("wbemscripting.swbemsink","sink_")

	' You have to specify a polling interval because Configuration Manager
	' does not provide an intrinsic event provider for these classes.
	Query = "SELECT * FROM __InstanceCreationEvent Within 120 " & _
			"WHERE TargetInstance.__Class = 'SMS_PackageStatusRootSummarizer' "
	connection.ExecNotificationQueryAsync sink, query

	query = "SELECT * FROM __InstanceModificationEvent Within 120 " & _
			"WHERE TargetInstance.__Class = 'SMS_PackageStatusRootSummarizer' "
	connection.ExecNotificationQueryAsync sink, query

	minutes = 0
   
	' Loop for 5 minutes.
	While minutes < 300
		wscript.sleep 1000
		minutes = minutes + 1
	Wend 
	
	sink.Cancel
	Set sink = nothing
	 
 End Sub   

' The sink subroutine to handle the OnObjectReady 
' event. This is called as each object returns.
Sub sink_OnObjectReady(statusEvent, octx)
   Wscript.Echo "Name: " + statusEvent.TargetInstance.Name
   Wscript.Echo "Targeted: " + CStr(statusEvent.TargetInstance.Targeted)
   Wscript.Echo "Installed: " + CStr(statusEvent.TargetInstance.Installed)
   Wscript.Echo
End Sub

Sub sink_OnCompleted(Hresult, oErr, oCtx)
	Wscript.Echo "Finished"
End Sub

public void QueryPackageStatus(string connectionPath)
{
   // WMIEvent we = new WMIEvent();
	ManagementEventWatcher modifiedWatcher = null;
	ManagementEventWatcher createdWatcher = null;
	WqlEventQuery modified;
	WqlEventQuery created;

	ManagementOperationObserver observer = new
		ManagementOperationObserver();

	// Bind to local machine.
	ConnectionOptions opt = new ConnectionOptions();
	opt.EnablePrivileges = true; //sets required privilege
	ManagementScope scope = new ManagementScope(connectionPath, opt);

	try
	{
		modified = new WqlEventQuery();
		modified.EventClassName = "__InstanceModificationEvent";
		modified.WithinInterval = new TimeSpan(0, 0, 120);
		modified.Condition = @"TargetInstance ISA 'SMS_PackageStatusRootSummarizer'";
		modifiedWatcher = new ManagementEventWatcher(scope, modified);

		// Register handler.
		modifiedWatcher.EventArrived += new EventArrivedEventHandler(this.ObjectReady);


		created = new WqlEventQuery();
		created.EventClassName = "__InstanceCreationEvent";
		created.WithinInterval = new TimeSpan(0, 0, 10);
		created.Condition = @"TargetInstance ISA 'SMS_PackageStatusRootSummarizer'";
		createdWatcher = new ManagementEventWatcher(scope, created);

		createdWatcher.EventArrived += new EventArrivedEventHandler(this.ObjectReady);

		modifiedWatcher.Start();
		createdWatcher.Start();

		// Wait.
		Console.ReadLine();
}
	catch (ManagementException e)
	{
		Console.WriteLine(e.Message);
}
	finally
	{
		modifiedWatcher.Stop();
		createdWatcher.Stop();
}
}

public void ObjectReady(object sender, EventArrivedEventArgs e)
{
	// Get the Event object and display it.
	PropertyData pd = e.NewEvent.Properties["TargetInstance"];

	Console.WriteLine("Hello:");

	if (pd != null)
	{
		ManagementBaseObject statusEvent = pd.Value as ManagementBaseObject;
		Console.WriteLine ("Name: " + statusEvent.Properties["Name"].Value);
		Console.WriteLine("Targeted: " + statusEvent.Properties["Targeted"].Value);
		Console.WriteLine("Installed:" + statusEvent.Properties["Installed"].Value);
		Console.WriteLine();
}
}