Sub ShowSiteTallyIntervals(connection, siteCode)

	Dim SCIComponent			'SMS_SCI_Component class
	Dim SCIComponentSet		 'Enumeration of SMS_SCI_Component
	Dim query 
	Dim i 
	Dim vProperty					 'Embedded property

	 
	query = "SELECT PropLists FROM SMS_SCI_Component " & _
			"WHERE ComponentName = 'SMS_COMPONENT_STATUS_SUMMARIZER' " & _
			"AND SiteCode = '" + siteCode + "'"

	' You do not need to get a copy of the site control file just to read it.
	Set SCIComponentSet = connection.ExecQuery(query)

	' The query returns only one instance.
	For Each SCIComponent In SCIComponentSet
		For Each vProperty In SCIComponent.PropLists
			If vProperty.PropertyListName = "Summary_Intervals" Then
				For i = 0 To UBound(vProperty.Values)
					WScript.Echo vProperty.Values(i) 
				Next
			End If
		Next
	Next
 End Sub

public void ShowSiteTallyIntervals(WqlConnectionManager connection, string siteCode)
{
	try
	{
		// Query for the site's site control file SMS_COMPONENT_STATUS_SUMMARIZER property lists.
		IResultObject query = 
			connection.QueryProcessor.ExecuteQuery("SELECT PropLists FROM SMS_SCI_Component " +
			"WHERE ComponentName = 'SMS_COMPONENT_STATUS_SUMMARIZER' " +
			"AND SiteCode = '" + siteCode + "'");


		foreach (IResultObject r in query)
		{
			// Get the summary intervals and display them.
		if (r.EmbeddedPropertyLists.ContainsKey("Summary_Intervals"))
			{
				Console.WriteLine(r.EmbeddedPropertyLists["Summary_Intervals"]["PropertyListName"].StringValue);
				foreach (string value in r.EmbeddedPropertyLists["Summary_Intervals"]["Values"].StringArrayValue)
				{
					Console.WriteLine(value);
			}
		}
			else
			{
				Console.WriteLine("Not found");
				return;
		}
	}
}
	catch (SmsException e)
	{
		Console.WriteLine("Failed to tally intervals: " + e.Message);
		throw;
}
}