Sub ModifySupportedPlatformsForProgram(connection, 	_
									 existingPackageID,   _
									 existingProgramName, _
									 newMaxVersion,  _
									 newMinVersion,  _
									 newName, 		 _
									 newPlatform)
									 
	 ' Define a constant with the hexadecimal value for RUN_ON_SPECIFIED_PLATFORMS. 
	 RUN_ON_SPECIFIED_PLATFORMS = &H08000000

	' Build a query to get the specified package. 
	packageQuery = "SMS_Package.PackageID='" & existingPackageID & "'"

	' Run the query to get the package.
	Set package = connection.Get(packageQuery)

	' Output package name and ID.
	wscript.echo "Package ID:	 "  & package.PackageID
	wscript.echo "Package Name:   "  & package.Name

	' Build a query to get the programs for the package. 
	programQuery = "SELECT * FROM SMS_Program WHERE PackageID='" & existingPackageID & "'"

	' Run the query to get the programs.
	Set allProgramsForPackage = connection.ExecQuery(programQuery, , wbemFlagForwardOnly Or wbemFlagReturnImmediately)

	'The query returns a collection of program objects that needs to be enumerated.
	For Each program In allProgramsForPackage			
		 
		If program.ProgramName = existingProgramName Then
		
			'Get all program object properties (in this case we specifically need some lazy properties).
			 programPath = program.Put_
			 Set program = connection.Get(programPath) 
 
'			 ' Check whether RUN_ON_SPECIFIED_PLATFORMS is already set.
			 checkPlatformValue = (program.ProgramFlags XOR RUN_ON_SPECIFIED_PLATFORMS)
			 
			If checkPlatformValue  = 0 Then
		
				' RUN_ON_SPECIFIED_PLATFORMS is not set. Setting RUN_ON_SPECIFIED_PLATFORMS value.
				program.ProgramFlags = (program.ProgramFlags XOR RUN_ON_SPECIFIED_PLATFORMS)
			
			End If					 
						 
			' Output the program name that is being checked for supported platforms.
			wscript.echo "Program Name: "  & program.ProgramName
		
			' Create 
			Set tempSupportedPlatform = connection.Get("SMS_OS_Details").SpawnInstance_
					 
			' Populate tempSupportedPlatform values.
			tempSupportedPlatform.MaxVersion = newMaxVersion
			tempSupportedPlatform.MinVersion = newMinVersion
			tempSupportedPlatform.Name	 = newName
			tempSupportedPlatform.Platform   = newPlatform
   
			' Get the array of supported operating systems.
			tempSupportedPlatformsArray = program.SupportedOperatingSystems   
		
			' Add the new supported platform values (object) to the temporary array.
			ReDim Preserve tempSupportedPlatformsArray (Ubound(tempSupportedPlatformsArray) + 1)
			Set tempSupportedPlatformsArray(Ubound(tempSupportedPlatformsArray)) = tempSupportedPlatform
		
			' Replace the SupportedOperatingSystems object array with the new updated array.
			program.SupportedOperatingSystems = tempSupportedPlatformsArray
		
			' Save the program.
			program.Put_
		
			' Output success message.
			wscript.echo "Supported Platforms Updated "
		
		
		End If	
						 
	Next

End Sub

public void ModifyProgramSupportedPlatforms(WqlConnectionManager connection,
									string existingPackageID,
									string existingProgramNameToModify,
									string newMaxVersion,
									string newMinVersion,
									string newName,
									string newPlatform)
{
	try
	{
		// Define a constant with the hexadecimal value for RUN_ON_SPECIFIED_PLATFORMS. 
		const Int32 RUN_ON_SPECIFIED_PLATFORMS = 0x08000000;

		// Build query to get the programs for the package. 
		string query = "SELECT * FROM SMS_Program WHERE PackageID='" + existingPackageID + "'";

		// Load the specific program to change (programname is a key value and must be unique).
		IResultObject programsForPackage = connection.QueryProcessor.ExecuteQuery(query);

		// The query returns a collection that needs to be enumerated.
		foreach (IResultObject program in programsForPackage)
		{
			// If a match for the program name is found, make the change(s).
			if (program["ProgramName"].StringValue == existingProgramNameToModify)
			{
				// Get all properties, specifically the lazy properties, for the program object.
				program.Get();

				// Check whether RUN_ON_SPECIFIED_PLATFORMS is already set.
				Int32 checkPlatformValue = (program["ProgramFlags"].IntegerValue ^ RUN_ON_SPECIFIED_PLATFORMS);
															
				if (checkPlatformValue == 0)
				{
					// RUN_ON_SPECIFIED_PLATFORMS is not set. Setting RUN_ON_SPECIFIED_PLATFORMS value.
					program["ProgramFlags"].IntegerValue = program["ProgramFlags"].IntegerValue ^ RUN_ON_SPECIFIED_PLATFORMS;
			}

				// Create a new array list to hold the supported platform window objects.
				List<IResultObject> tempSupportedPlatformsArray = new List<IResultObject>();

				// Create and populate a temporary SMS_OS_Details object with the new OS values.
				IResultObject tempSupportedPlatformsObject = connection.CreateEmbeddedObjectInstance("SMS_OS_Details");

				// Populate temporary SMS_OS_Details object with the new supported platforms values.
				tempSupportedPlatformsObject["MaxVersion"].StringValue = newMaxVersion;
				tempSupportedPlatformsObject["MinVersion"].StringValue = newMinVersion;
				tempSupportedPlatformsObject["Name"].StringValue = newName;
				tempSupportedPlatformsObject["Platform"].StringValue = newPlatform;

				// Populate the local array list with the existing supported platform objects (type SMS_OS_Details).
				tempSupportedPlatformsArray = program.GetArrayItems("SupportedOperatingSystems");

				// Add the newly created service window object to the local array list.
				tempSupportedPlatformsArray.Add(tempSupportedPlatformsObject);

				// Replace the existing service window objects from the target collection with the temporary array that includes the new service window.
				program.SetArrayItems("SupportedOperatingSystems", tempSupportedPlatformsArray);

				// Save the new values in the collection settings instance associated with the Collection ID.
				program.Put();

				// Output program name.
				Console.WriteLine("Modified program: " + program["ProgramName"].StringValue);
		}
	}
}
	catch (SmsException ex)
	{
		Console.WriteLine("Failed to modify the program. Error: " + ex.Message);
		throw;
}
}