Sub RemoveDriverFromBootImagePackage(connection, driverId, packageId)
	Dim bootImagePackage
	Dim driver 
	Dim driverDetails
	Dim newReferencedDrivers()
	Dim found
	Dim index

	' Get the boot image package.
	Set bootImagePackage = connection.Get("SMS_BootImagePackage.PackageID='" & packageId &"'" )

	found = False
	index=0

	' Copy the contents and leave out the driver.
	For Each driver In bootImagePackage.ReferencedDrivers
		If driver.ID = driverID Then
			found=True
		Else
		 Set newReferencedDrivers(index)=driver
		 index = index + 1 
		End If
	Next

	' Update the referenced drivers.
	If found=True Then  
		ReDim preserve newReferencedDrivers(UBound(bootImagePackage.ReferencedDrivers)-1)
		bootImagePackage.ReferencedDrivers=newReferencedDrivers
		bootImagePackage.Put_
		bootImagePackage.RefreshPkgSource
   End If		 
 
End Sub

public void RemoveDriverFromBootImagePackage(
	WqlConnectionManager connection,
	int driverId,
	string packageId)
{
	try
	{
		// Get the boot image package.
		IResultObject bootImagePackage = connection.GetInstance(@"SMS_BootImagePackage.packageId='" + packageId + "'");
	
		// Get the (SMS_Driver_Details) drivers referenced by the package.
		List<IResultObject> referencedDrivers = bootImagePackage.GetArrayItems("ReferencedDrivers");

		foreach (IResultObject ro in referencedDrivers)
		{
			if (ro["ID"].IntegerValue == driverId) // Remove the driver that matches driverId.
			{
				referencedDrivers.Remove(ro);
				break;
		}
	}

		bootImagePackage.SetArrayItems("ReferencedDrivers", referencedDrivers);

		// Commit the changes.
		bootImagePackage.Put();
		bootImagePackage.ExecuteMethod("RefreshPkgSource", null);
}
	catch (SmsException e)
	{
		Console.WriteLine(e.Message);
		throw;
}
}