Sub ConfigureAutomaticSWMRuleGeneration(swbemServices, 			_
										swbemContext, 			 _
										siteCode, 				 _	 
										enableAutoCreateDisabledRule,   _
										newAutoCreatePercentage, 	_
										newAutoCreateThreshold)

	' Load site control file and get the SMS_SCI_ClientComp section.
	swbemServices.ExecMethod "SMS_SiteControlFile.Filetype=1,Sitecode=""" & siteCode & """", "Refresh", , , swbemContext

	Query = "SELECT * FROM SMS_SCI_ClientComp " &   _
	"WHERE ClientComponentName  = 'Software Metering Agent'" & _
	"AND SiteCode = '" & siteCode & "'" 

	 Set SCIComponentSet = swbemServices.ExecQuery(Query, ,wbemFlagForwardOnly Or wbemFlagReturnImmediately, swbemContext)   
					 
	' Only one instance is returned from the query.
	For Each SCIComponent In SCIComponentSet
 
		'Loop through the array of embedded SMS_EmbeddedProperty instances.
		For Each vProperty In SCIComponent.Props

			' Setting: Auto Create Disabled Rule
			If vProperty.PropertyName = "Auto Create Disabled Rule" Then
				wscript.echo " "
				wscript.echo vProperty.PropertyName
				wscript.echo "Current value " &  vProperty.Value			 
			
				'Modify the value.
				vProperty.Value = enableAutoCreateDisabledRule
				wscript.echo "New value " & enableAutoCreateDisabledRule
			End If		 
			 
			' Setting: Auto Create Percentage
			If vProperty.PropertyName = "Auto Create Percentage" Then
				wscript.echo " "
				wscript.echo vProperty.PropertyName
				wscript.echo "Current value " &  vProperty.Value			 
			
				' Modify the value.
				vProperty.Value = newAutoCreatePercentage
				wscript.echo "New value " & newAutoCreatePercentage
			End If		 

			' Setting: Auto Create Threshold
			If vProperty.PropertyName = "Auto Create Threshold" Then
				wscript.echo " "
				wscript.echo vProperty.PropertyName
				wscript.echo "Current value " &  vProperty.Value			 
			
				' Modify the value.
				vProperty.Value = newAutoCreateThreshold
				wscript.echo "New value " & newAutoCreateThreshold
			End If		 

		Next   

		' Update the component in your copy of the site control file. Get the path
		' to the updated object, which could be used later to retrieve the instance.
		Set SCICompPath = SCIComponent.Put_(wbemChangeFlagUpdateOnly, swbemContext)
	
	Next
					
	' Commit the change to the actual site control file.
	Set InParams = swbemServices.Get("SMS_SiteControlFile").Methods_("CommitSCF").InParameters.SpawnInstance_
	InParams.SiteCode = siteCode
	swbemServices.ExecMethod "SMS_SiteControlFile", "CommitSCF", InParams, , swbemContext

	' Release the copy of the site control file.
	swbemServices.Get("SMS_SiteControlFile").ReleaseSessionHandle swbemContext.Item("SessionHandle").Value

End Sub

public void ConfigureAutomaticSWMRuleGeneration(WqlConnectionManager connection,
												string siteCode,
												string enableAutoCreateDisabledRule,
												string newAutoCreatePercentage,
												string newAutoCreateThreshold)
{
	try
	{
		IResultObject siteDefinition = connection.GetInstance(@"SMS_SCI_ClientComp.FileType=1,ItemType='Client Component',SiteCode='" + siteCode + "',ItemName='Software Metering Agent'");

		foreach (KeyValuePair<string, IResultObject> kvp in siteDefinition.EmbeddedProperties)
		{
			// Create temporary working copy of embedded properties.
			Dictionary<string, IResultObject> embeddedProperties = siteDefinition.EmbeddedProperties;

			//Console.WriteLine(kvp.Value.PropertyList["PropertyName"]);

			// Setting: Auto Create Disabled Rule
			if (kvp.Value.PropertyList["PropertyName"] == "Auto Create Disabled Rule")
			{
				Console.WriteLine();
				Console.WriteLine(kvp.Value.PropertyList["PropertyName"]);
				Console.WriteLine("Current value: " + embeddedProperties["Auto Create Disabled Rule"]["Value"].StringValue);

				// Change value using the enableAutoCreateDisabledRule value passed in. 
				embeddedProperties["Auto Create Disabled Rule"]["Value"].StringValue = enableAutoCreateDisabledRule;
				Console.WriteLine("New value	: " + enableAutoCreateDisabledRule);
		}

			// Setting: Auto Create Percentage
			if (kvp.Value.PropertyList["PropertyName"] == "Auto Create Percentage")
			{
				Console.WriteLine();
				Console.WriteLine(kvp.Value.PropertyList["PropertyName"]);
				Console.WriteLine("Current value: " + embeddedProperties["Auto Create Percentage"]["Value"].StringValue);

				// Change value using the newAutoCreatePercentage value passed in. 
				embeddedProperties["Auto Create Percentage"]["Value"].StringValue = newAutoCreatePercentage;
				Console.WriteLine("New value	: " + newAutoCreatePercentage);
		}

			// Setting: Auto Create Threshold
			if (kvp.Value.PropertyList["PropertyName"] == "Auto Create Threshold")
			{
				Console.WriteLine();
				Console.WriteLine(kvp.Value.PropertyList["PropertyName"]);
				Console.WriteLine("Current value: " + embeddedProperties["Auto Create Threshold"]["Value"].StringValue);

				// Change value using the newAutoCreateThreshold value passed in. 
				embeddedProperties["Auto Create Threshold"]["Value"].StringValue = newAutoCreateThreshold;
				Console.WriteLine("New value	: " + newAutoCreateThreshold);
		}

			// Store the settings that have changed.
			siteDefinition.EmbeddedProperties = embeddedProperties;
	}

		// Save the settings.
		siteDefinition.Put();

}

	catch (SmsException ex)
	{
		Console.WriteLine("Failed. Error: " + ex.InnerException.Message);
		throw;
}
}