Sub SetNetworkInterface (connection, context,server, siteCode, macAddress)

	Dim InParams
	Dim found

	Set InParams = connection.Get("SMS_SiteControlFile").Methods_("RefreshSCF").InParameters.SpawnInstance_
InParams.SiteCode = siteCode
connection.ExecMethod "SMS_SiteControlFile", "RefreshSCF", InParams, , Context

	
	Query = "SELECT * FROM SMS_SCI_SysResUse " & _
			"WHERE RoleName = 'SMS PXE Service Point' " & _
			"AND SiteCode = '" & siteCode & "'"

	found = false

	Set SCIComponentSet = connection.ExecQuery(Query, , , context)
					 
	' Only one instance is returned from the query.
	For Each SCIComponent In SCIComponentSet
		 
		' Add the new MAC address.
		For Each vProperty in SCIComponent.PropLists
			if   vProperty.PropertyListName = "BindExcept" Then

				Dim  macAddresses 
				Dim i
			
				found = true
			
				' Resize the array to accommodate the new MAC address.
				ReDim  macAddresses(UBound (vProperty.Values)+1)
				 
				 for i  = 0 to UBound(vProperty.Values) 
					macAddresses(i) = vProperty.Values(i)
				 Next
			 
				macAddresses(ubound (macAddresses))= macAddress
				vProperty.Values = macAddresses
			End If
		Next
	
		' Did not find BindExcept, so create it.
		If found = False Then
			Set embeddedPropertyList = goWMIConnection.Get("SMS_EmbeddedPropertyList").Spawninstance_()
			embeddedPropertyList.PropertyListName = "BindExcept"
			embeddedPropertyList.Values = Array(macAddress)
		
			SCIComponent.Proplists = Array(embeddedPropertyList)
		End If	 


			 ' 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_( , 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 SetNetworkInterface(
	WqlConnectionManager connection, 
	string server, 
	string siteCode, 
	string macAddress)
{
	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 + "'");

		Dictionary<string, IResultObject> embeddedPropertyLists = ro.EmbeddedPropertyLists;

		string[] macAddresses = embeddedPropertyLists["BindExcept"]["Values"].StringArrayValue; // mac addresses

		List<string> addressList = new List<string>(); // Convert to list.
		foreach (string mac in macAddresses)
		{
			addressList.Add(mac);
	}

		addressList.Add(macAddress);  // Add the new mac address.
		embeddedPropertyLists["BindExcept"]["Values"].StringArrayValue = addressList.ToArray();
		ro.EmbeddedPropertyLists = embeddedPropertyLists;
	
		// Commit the changes.
		ro.Put();
}
	catch (SmsException e)
	{
		Console.WriteLine("Failed to set PXE response for a specific network: " + e.Message);
		throw;
}
}