[Guid("b7ea3f7d-b260-4ce8-9fd0-3af5aee8e0d6")]

public class CustomListViewWebPart : System.Web.UI.WebControls.WebParts.WebPart

{

   #region Properties

   private readonly ILogger _logger = LoggerFactory.GetLogger();

   /// <summary>

   /// The List we are displaying

   /// </summary>

   [Personalizable(true),

   WebBrowsable,

   WebPartStorage(Storage.Shared),

   SPWebCategoryName("Settings"),

   WebDisplayName("Source List Name"),

   WebDescription("Pass the name of the List to show")]

   public string SourceList { get; set; }

   /// <summary>

   /// The Default View of the list

   /// </summary>

   [Personalizable(true),

   WebBrowsable,

   WebPartStorage(Storage.Shared),

   SPWebCategoryName("Settings"),

   WebDisplayName("View"),

   WebDescription("Pass the name of the View that you want to apply to the List")]

   public string ViewOfSourceList { get; set; }

   /// <summary>

   /// a CAML query to filter the object

   /// </summary>

   /// <remarks>

   /// in a later revision we will use one or more filter providers to set this

   /// </remarks>

   [Personalizable(true),

   WebBrowsable,

   WebPartStorage(Storage.Shared),

   SPWebCategoryName("Settings"),

   WebDisplayName("Query"),

   WebDescription("Pass the Filter Query, if you wire up some Filter WebParts they have priority over the query and this will be ignored")]

   public string FilterQuery { get; set; }

   private readonly List<IFilterValues> _filterProviders = new List<IFilterValues>();

   private List<IFilterValues> FilterProviders

   {

      get { return _filterProviders; }

   }

   #endregion

   public CustomListViewWebPart()

   {

      ExportMode = WebPartExportMode.All;

   }

   protected override void CreateChildControls()

   {

      base.CreateChildControls();

      SPWeb web = SPContext.Current.Web;

      {

         try

         {

            SPList list = web.Lists[SourceList];

            // create the toolbar, actually we cannot hide it, we'll need to extend the webpart and those options

            ViewToolBar toolbar = new ViewToolBar();

            SPContext context = SPContext.GetContext(Context, list.Views[ViewOfSourceList].ID, list.ID, SPContext.Current.Web);

            toolbar.RenderContext = context;

            Controls.Add(toolbar);

            // get a reference to the view we want to use (or use the default view if nothing is specified)

            SPView webPartView;

            if (!string.IsNullOrEmpty(ViewOfSourceList))

               webPartView = web.Lists[SourceList].Views[ViewOfSourceList];

            else

               webPartView = web.Lists[SourceList].DefaultView;

            // create a new view based on the original one and attach the filter query to it

            // in this way we do not need to modify/update the original element and

            // even a user without updating permissions can use this webpart

            XmlDocument domDoc = new XmlDocument();

            domDoc.LoadXml(webPartView.SchemaXml);

            SPView view = new SPView(list, domDoc);

            _logger.AppendLogFormat("View ID: {0}", view.ID);

            // build the filter

            ApplyFilters(list, view);

            // render the view

            Literal lbl = new Literal();

            lbl.Text = view.RenderAsHtml();

            Controls.Add(lbl);

            // add the logging messages if there are any

            string lg = _logger.ToString();

            if (!string.IsNullOrEmpty(lg))

            {

               Literal logLbl = new Literal();

               logLbl.Text = "<br/>" + lg;

               Controls.Add(logLbl);

            }

         }

         catch (Exception ex)

         {

            // todo: have a better way to report errors!

            Label lbl = new Label();

            lbl.Text = _logger.ToString() + "<br />";

            lbl.Text += "Error occured: ";

            lbl.Text += ex.Message + "<br />" + ex.StackTrace;

            Controls.Add(lbl);

         }

      }

   }

   /// <summary>

   /// how to concatenate different filters

   /// </summary>

   const string FiltersConcatenation = "And";

   /// <summary>

   /// how to concatenate multiple values in the same filter

   /// </summary>

   const string FiltersMultipleValuesConcatenation = "Or";

   private void ApplyFilters(SPList list, SPView view)

   {

      _logger.AppendLogFormat("Filters numbers: {0}", FilterProviders.Count);

      if (FilterProviders.Count == 0)

         view.Query = FilterQuery;

      else

      {

         if (FilterProviders.Count > 0)

         {

            // build the filter according to the passed data

            // holds each internal filter

            List<string> filters = BuildFiltersList(list);

            // assign the list of filters, concatenate them if more than one

            if (filters.Count > 0)

            {

               StringBuilder sb = new StringBuilder();

               sb.Append("<Where>");

               if (filters.Count == 1)

                  sb.Append(filters[0]);

               else

               {

                  // we have more than 1 filter and we need to concat

                  for (int i = 0; i < filters.Count; i++)

                  {

                     if (i != 1)

                        sb.Insert(0, String.Format("<{0}>", FiltersConcatenation));

                     sb.Append(filters[i]);

                     if (i > 0)

                        sb.AppendFormat("</{0}>", FiltersConcatenation);

                  }

               }

               sb.Append("</Where>");

               string query = sb.ToString();

               view.Query = query;

               _logger.AppendLog("query: {0}" + query);

            }

            _logger.AppendLog("query: -");

         }

      }

   }

   /// <summary>

   /// build the filter list to apply to the view

   /// </summary>

   /// <param name="list"></param>

   /// <returns></returns>

   private List<string> BuildFiltersList(SPList list)

   {

      List<string> filters = new List<string>();

      ReadOnlyCollection<string> paramValues;

      foreach (IFilterValues f in FilterProviders)

      {

         paramValues = f.ParameterValues;

         _logger.AppendLogFormat("Filter: {0}", f.ParameterName);

         _logger.AppendLogFormat("Filter Params: {0}", (paramValues != null));

         if ((paramValues != null) && (paramValues.Count > 0))

         {

            StringBuilder innerSb = new StringBuilder();

            _logger.AppendLogFormat("Found filter: {0}  values n: {1}", f.ParameterName, paramValues.Count);

            // check for single parameter value

            if (paramValues.Count == 1)

               innerSb.AppendFormat("<Eq><FieldRef Name='{0}' /><Value Type='{1}'>{2}</Value></Eq>",

                                    list.Fields[f.ParameterName].InternalName,

                                    list.Fields[f.ParameterName].TypeAsString,

                                    paramValues[0]);

            else

            {

               // multiple values we need to concat in the right way for a CAML query

               for (int i = 0; i < paramValues.Count; i++)

               {

                  if (i != 1)

                     innerSb.Insert(0, String.Format("<{0}>", FiltersMultipleValuesConcatenation));

                  innerSb.AppendFormat("<Eq><FieldRef Name='{0}' /><Value Type='{1}'>{2}</Value></Eq>",

                                       list.Fields[f.ParameterName].InternalName,

                                       list.Fields[f.ParameterName].TypeAsString,

                                       paramValues[i]);

                  if (i > 0)

                     innerSb.AppendFormat("</{0}>", FiltersMultipleValuesConcatenation);

               }

            }

            filters.Add(innerSb.ToString());

         }

      }

      return filters;

   }

   protected override void Render(HtmlTextWriter writer)

   {

      EnsureChildControls();

      base.Render(writer);

   }

   [ConnectionConsumer("Filters", "FiltersForConsumer", AllowsMultipleConnections = true)]

   public void SetFilter(IFilterValues filterValues)

   {

      if (filterValues != null)

      {

         // EnsureChildControls();

         _logger.AppendLog("Assigning filters");

         _logger.AppendLogFormat("Assigning filter: {0}", filterValues.ParameterName);

         _logger.AppendLogFormat("Assigning filter: {0}", (filterValues.ParameterValues != null));

         filterValues.SetConsumerParameters(GetParameters());

         FilterProviders.Add(filterValues);

         _logger.AppendLog("Filters Assigned");

      }

   }

   /// <summary>

   /// Build a parameter List to allow the filtering of the List on the values provided

   /// by a series of filters.

   /// </summary>

   /// <returns></returns>

   private ReadOnlyCollection<ConsumerParameter> GetParameters()

   {

      List<ConsumerParameter> parameters = new List<ConsumerParameter>();

      // we get all the fields of the list we are displaying

      SPList list = SPContext.Current.Web.Lists[SourceList];

      // we build a parameter for any field of the list (similar to the standard ListViewWebPart)

      foreach (SPField item in list.Fields)

         parameters.Add(new ConsumerParameter(item.Title,

             ConsumerParameterCapabilities.SupportsMultipleValues |

             ConsumerParameterCapabilities.SupportsAllValue |

             ConsumerParameterCapabilities.SupportsEmptyValue |

             ConsumerParameterCapabilities.SupportsSingleValue));

      return new ReadOnlyCollection<ConsumerParameter>(parameters);

   }

}

/// <summary>

/// Creates an eml file to be delivered with the default mail client

/// </summary>

/// <param name="from">address that sends the email</param>

/// <param name="to">address to which send the email</param>

/// <param name="subject">subject</param>

/// <param name="body">body</param>

/// <param name="attachments">list of attachments</param>

/// <param name="destFolder">destination folder to store the file</param>

/// <returns>The complete path of the newely generated EML file</returns>

public static string CreateEml(string from,

                               string to,

                               string subject,

                               string body,

                               IEnumerable<Attachment> attachments,

                               string destFolder)

{

   using (MailMessage mail = new MailMessage())

   {

      mail.From = new MailAddress(from);

      mail.To.Add(to);

      mail.Subject = subject;

      mail.Body = body;

      if (attachments != null)

         foreach (var attachment in attachments)

            mail.Attachments.Add(attachment);

      SmtpClient smtpClient = new SmtpClient

                                 {

                                    PickupDirectoryLocation = destFolder,

                                    DeliveryMethod = SmtpDeliveryMethod.SpecifiedPickupDirectory

                                 };

      smtpClient.Send(mail);

   }

   DirectoryInfo dir = new DirectoryInfo(destFolder);

   FileInfo file = dir.GetFiles("*.eml", SearchOption.TopDirectoryOnly).OrderByDescending(m => m.CreationTimeUtc).First();

   return file.FullName;

}

...

using (DbCommand c = CurrentDatabase.GetSqlStringCommand(sql))

{

   CurrentDatabase.AddInParameter(c, "UserId", DbType.String, UserName);

   IDataReader dr;

   List<Filiale> list = new List<Filiale>();

   dr = CurrentDatabase.ExecuteReader(c);

   while (dr.Read())

   {

      list.Add(BuildObjectFromDataRow(dr));

   }

   return list;

}

...

^(?!.*\busing\b).*ExecuteReader

^(~(.*<using>)).*ExecuteReader

...

processToWait = Process.GetProcessById(pid)

mProcessToWait.CloseMainWindow()

mProcessToWait.WaitForExit()

mProcessToWait.Close()

...

...

Const WM_SYSCOMMAND As Int32 = &H112

Const SC_CLOSE As Int32 = &HF060I

Declare Function PostMessage Lib "user32.dll" Alias "PostMessageA" ( _

  ByVal hwnd As Int32, _

  ByVal wMsg As Int32, _

  ByVal wParam As Int32, _

  ByVal lParam As Int32) As Int32

...

Dim handle As IntPtr = mProcessToWait.MainWindowHandle

PostMessage(handle.ToInt32, WM_SYSCOMMAND, SC_CLOSE, 0)

mProcessToWait.WaitForExit()

mProcessToWait.Close()

/// <summary>

/// Inherits from the default ReleasePolicy; do not track our own transient objects.

/// Only tracks components that have decommission steps

/// registered or have pooled lifestyle.

/// </summary>

[Serializable]

public class TrulyTransientReleasePolicy : LifecycledComponentsReleasePolicy

{

    public override void Track(object instance, Burden burden)

    {

        ComponentModel model = burden.Model;

        // to modify the way Castle handles the Transient object uncomment the following lines

        if (model.LifestyleType == LifestyleType.Transient)

            return;

        base.Track(instance, burden);

    }

}

/// <summary>

/// a custom Lifestyle, it will inerit from the standard class so if the TrulyTransientReleasePolicy policy

/// isn't used these objects are handled as standard transient objects 

/// </summary>

public class TrulyTransientLifestyleManager : TransientLifestyleManager

{

}

/// <summary>

/// Inherits from the default ReleasePolicy; do not track our own transient objects.

/// Only tracks components that have decommission steps

/// registered or have pooled lifestyle.

/// </summary>

[Serializable]

public class TrulyTransientReleasePolicy : LifecycledComponentsReleasePolicy

{

   public override void Track(object instance, Burden burden)

   {

      ComponentModel model = burden.Model;

      // to modify the way Castle handles the Transient object uncomment the following lines

      //if (model.LifestyleType == LifestyleType.Transient)

      //   return;

      // we skip the tracking for object marked with our custom Transient lifestyle manager

      if ((model.LifestyleType == LifestyleType.Custom) &&

          (typeof(TrulyTransientLifestyleManager) == model.CustomLifestyle))

         return;

      base.Track(instance, burden);

   }

}

...

_container = new WindsorContainer(

   new XmlInterpreter(new ConfigResource("services")));

_container.Kernel.ReleasePolicy = new TrulyTransientReleasePolicy();

...

...

<components>

   <!-- test data provider, this one returns some hardcoded data -->

   <component id="DisposableEntity"

              service="IoCRelease.Entities.ITestEntity,IoCRelease"

              type="IoCRelease.Entities.DisposableEntity,IoCRelease"

              lifestyle="transient">

   </component>

   <component id="DisposableEntityTransient"

              service="IoCRelease.Entities.ITestEntity,IoCRelease"

              type="IoCRelease.Entities.DisposableEntity,IoCRelease"

              lifestyle="custom"

              customLifestyleType="IoCRelease.Castle.TrulyTransientLifestyleManager,IoCRelease">

   </component>

   <component id="Entity"

              service="IoCRelease.Entities.ITestEntity,IoCRelease"

              type="IoCRelease.Entities.Entity,IoCRelease"

              lifestyle="transient">

   </component>

</components>

...

unlodctr .NETFramework

lodctr c:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\corperfmonsymbols.ini

[Guid("4fddd9c3-37bf-48b9-84a2-0b4d96f98f92")]

public class SelectedUserFilterWebPart : wsswebparts.WebPart, wsswebparts.ITransformableFilterValues

{

   private PeopleEditor _pplEditor;

   private Button _btnApplyFilter;

   protected override void CreateChildControls()

   {

      base.CreateChildControls();

      _pplEditor = new PeopleEditor();

      Controls.Add(_pplEditor);

      _btnApplyFilter = new Button();

      _btnApplyFilter.Text = "Apply Filter";

      Controls.Add(_btnApplyFilter);

   }

   private List<String> GetSelectedEntries()

   {

      List<String> selectedEnties = new List<String>();

      try

      {

         foreach (PickerEntity entity in _pplEditor.ResolvedEntities)

         {

            if (entity.IsResolved)

            {

               selectedEnties.Add(entity.DisplayText);

            }

         }

      }

      catch (Exception)

      {

      }

      return selectedEnties;

   }

    // Implementations of the ITransformableFilterValues properties.

    [wsswebparts.WebPartStorage(wsswebparts.Storage.None)]

    public virtual bool AllowMultipleValues

    {

        get

        {

            return true;

        }

    }

    [wsswebparts.WebPartStorage(wsswebparts.Storage.None)]

    public virtual bool AllowAllValue

    {

        get

        {

            return true;

        }

    }

    [wsswebparts.WebPartStorage(wsswebparts.Storage.None)]

    public virtual bool AllowEmptyValue

    {

        get

        {

            return true;

        }

    }

    [wsswebparts.WebPartStorage(wsswebparts.Storage.None)]

    public virtual string ParameterName

    {

        get

        {

            return "SelectedUser";

        }

    }

    [wsswebparts.WebPartStorage(wsswebparts.Storage.None)]

    public virtual ReadOnlyCollection<string> ParameterValues

    {

        get

        {

           List<String> data = GetSelectedEntries();

           if (data.Count == 0)

              return null;

           return new ReadOnlyCollection<string>(data);

        }

    }

    // Use the ConnectionProvider attribute to specify the method that the Web Part

    // Framework should call to allow us to return an instance of our ITransformableFilterValues interface.

    [aspnetwebparts.ConnectionProvider("Selected User Filter", "ITransformableFilterValues", AllowsMultipleConnections = true)]

    public wsswebparts.ITransformableFilterValues SetConnectionInterface()

    {

        return this;

    }

}