Sub SetResponseDelay(connection, 	_
					 context, 	 _
					 siteCode, 		 _
					 delay)
 
	' Load site control file and get SMS PXE service point section.
	connection.ExecMethod "SMS_SiteControlFile.Filetype=1,Sitecode=""" & siteCode & """", "Refresh", , , context
	
	Query = "SELECT * FROM SMS_SCI_SysResUse " & _
			"WHERE RoleName = 'SMS PXE Service Point' " & _
			"AND SiteCode = '" & siteCode & "'"

	Set SCIComponentSet = connection.ExecQuery(Query, ,wbemFlagForwardOnly Or wbemFlagReturnImmediately, context)
					 
	' Only one instance is returned from the query.
	For Each SCIComponent In SCIComponentSet

		 ' Display SMS PXE service point server name.
		 wscript.echo "SMS PXE Service Point Server: " & SCIComponent.NetworkOSPath								

		' Loop through the array of embedded property instances.
		For Each vProperty In SCIComponent.Props
		
			' Setting: ResponseDelay
			If vProperty.PropertyName = "ResponseDelay" Then
				wscript.echo " "
				wscript.echo vProperty.PropertyName
				wscript.echo "Current value " &  vProperty.Value			 
			
				' Modify the value.
				vProperty.Value = delay
				wscript.echo "New value " & delay
			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, context)
	Next
					
	' Commit the change to the actual site control file.
	Set InParams = connection.Get("SMS_SiteControlFile").Methods_("CommitSCF").InParameters.SpawnInstance_
	InParams.SiteCode = siteCode
	connection.ExecMethod "SMS_SiteControlFile", "CommitSCF", InParams, , context

End Sub

public void SetResponseDelay(
	WqlConnectionManager connection, 
	string server, 
	string siteCode, 
	int delay)
{
	try
	{
		// Get PXE properties.
		IResultObject ro = connection.GetInstance("SMS_SCI_SysResUse.FileType=2,ItemName='[\"Display=\\\\" + 
			server + "\\\"]MSWNET:[\"SMS_SITE=" + 
			siteCode + "\"]\\\\" + 
			server + "\\,SMS PXE Service Point',ItemType='System Resource Usage',SiteCode='" + 
			siteCode + "'");

		// Get the embedded properties.
		Dictionary<string, IResultObject> embeddedProperties = ro.EmbeddedProperties; // Get a copy

		// Update the response delay.
		embeddedProperties["ResponseDelay"]["Value"].IntegerValue = delay; // In seconds.

		ro.EmbeddedProperties = embeddedProperties;

		// Commit changes.
		ro.Put();
}
	catch (SmsException e)
	{
		Console.WriteLine("Failed to set PXE response delay: " + e.Message);
		throw;
}
}