Question

我有一个应用程序利用Entity Framework 5 Database First，VB.net，Linq，SQL Server 2008 R2和Disconnected Repository Pattern。

我已经使用EF5.x dbContext生成器来创建我的POCO并修改了T4模板以添加各种额外的位和bob，包括我的INotifiyPropertyChanged事件提升。

我有各种链接表，我需要以“友好”的方式显示数据。

举个例子，我有以下两个表格;

颜色

Colour_ID    |  Colour_Name    | Created_By | Creation_Date | Modified_By |  Modification_Date
----------------------------------------------------------------------------------------------
   1         |     Blue        |     1      |    22-01-13   |     1       |       23-01-13

用户：

User_ID  |  First_Name  | Last_Name  |
--------------------------------------
   1     |    Peter     | Gallagher  |

为了在我的DataGrids中显示“友好数据”，我将提取数据，并使用以下代码创建“友好实体”;

Using CriticalPathDBContext As CriticalPathEntities = ConnectToDatabase()

        Dim query = (From Colour In CriticalPathDBContext.Colours _
                     .Include(Function(x) x.CreationUser) _
                     .Include(Function(x) x.LastUpdateUser).AsNoTracking.ToList
                     Select New FriendlyColours With {.CreatedBy = If(Colour.CreationUserCode Is Nothing, "", Colour.CreationUser.First_Name & " " & Colour.CreationUser.Last_Name),
                                                      .CreationDate = Colour.CreationDate,
                                                      .CreationUserCode = Colour.CreationUserCode,
                                                      .LastUpdateDate = Colour.LastUpdateDate,
                                                      .LastUpdatedBy = If(Colour.LastUpdateUserCode Is Nothing, "", Colour.LastUpdateUser.First_Name & " " & Colour.LastUpdateUser.Last_Name),
                                                      .LastUpdateUserCode = Colour.LastUpdateUserCode,
                                                      .Colour_ID = Colour.Colour_ID,
                                                      .Colour_Name = Colour.Colour_Name}).OrderBy(Function(x) x.Colour_Name)

        Return New ObservableCollection(Of FriendlyColours)(query)

End Using

我的问题是，对于更复杂的连接实体，这种类型的查询需要太长时间。

我考虑使用我的好友类来提取相关数据，但是在断开连接的模式中，这对我不起作用。

显然，在断开连接时，延迟加载不是一种选择......

所以，我的问题是......有更好的方法吗？为了更好...阅读更快！

任何帮助都会感激不尽！也许我错过了一些明显的东西！

编辑...进一步解释：

我有一个查询返回所有产品，以及他们的组件和产品库存项目......
返回4种不同类型的组件列表，如以及产品库存项目清单。
我采取每组组件和产品库存项目，并填写关联网格与结果。
用户可以添加，编辑或删除各种组件或产品库存项目中的项目。

查询是（抱歉大小！）;

Dim query = (From ProductList In _DBContext.Products _
             .Include(Function(x) x.CreationUser) _
             .Include(Function(x) x.LastUpdateUser) _
             .Include(Function(x) x.Colour) _
             .Include(Function(x) x.License) _
             .Include(Function(x) x.Pack_Size) _
             .Include(Function(x) x.Customer) _
             .Include(Function(x) x.Supplier) _
             .Include(Function(x) x.ProductComponents) _
             .Include(Function(x) x.ProductComponents.Select(Function(y) y.ApprovalType)) _
             .Include(Function(x) x.ProductComponents.Select(Function(y) y.Component)) _
             .Include(Function(x) x.ProductComponents.Select(Function(y) y.Component).Select(Function(z) z.ComponentType)) _
             .Include(Function(x) x.Product_Stock_Item) _
             .Include(Function(x) x.Product_Stock_Item.Select(Function(y) y.Pack_Type)) _
             .Include(Function(x) x.Product_Stock_Item.Select(Function(y) y.Product_Sizing)) _
             .Include(Function(x) x.Product_Stock_Item.Select(Function(y) y.Units_Of_Measure)) _
             .Include(Function(x) x.ProductType) _
             .Include(Function(x) x.ProductClassification) _
             .Include(Function(x) x.ProductType.ProductDepts) _
             .Include(Function(x) x.Season).AsNoTracking().OrderBy(Function(x) x.Product_Code).ToList
             Select New FriendlyProducts With {.Colour_ID = ProductList.Colour_ID,
                                               .Colour_Name = If(ProductList.Colour_ID Is Nothing, "", ProductList.Colour.Colour_Name),
                                               .CreatedBy = If(ProductList.CreationUserCode Is Nothing, "", ProductList.CreationUser.First_Name & " " & ProductList.CreationUser.Last_Name),
                                               .CreationDate = ProductList.CreationDate,
                                               .CreationUserCode = ProductList.CreationUserCode,
                                               .FriendlyCreationUser = ProductList.CreationUser,
                                               .Cust_Product_Desc_24 = ProductList.Cust_Product_Desc_24,
                                               .Cust_Product_Desc_48 = ProductList.Cust_Product_Desc_48,
                                               .Customer_Code = ProductList.Customer_Code,
                                               .Customer_Name = If(ProductList.Customer_Code Is Nothing, "", ProductList.Customer.NAME),
                                               .Description = ProductList.Description,
                                               .DesignNo = ProductList.DesignNo,
                                               .Gender_ID = ProductList.Gender_ID,
                                               .Gender_Name = If(ProductList.Gender_ID Is Nothing, "", ProductList.Gender.Gender_Name),
                                               .LicenseCode = ProductList.LicenseCode,
                                               .License_Name = If(ProductList.LicenseCode Is Nothing, "", ProductList.License.NAME),
                                               .Pack_Size_ID = ProductList.Pack_Size_ID,
                                               .Pack_Size_Name = If(ProductList.Pack_Size_ID Is Nothing, "", ProductList.Pack_Size.Pack_Size_Name),
                                               .PackagingNR = ProductList.PackagingNR,
                                               .ProductClassification_ID = ProductList.ProductClassification_ID,
                                               .Product_Classification_Name = If(ProductList.ProductClassification_ID Is Nothing, "", ProductList.ProductClassification.ProductClassification_Name),
                                               .Product_Code = ProductList.Product_Code,
                                               .Product_Picture_Path = ProductList.Product_Picture_Path,
                                               .ProductComponentsNR = ProductList.ProductComponentsNR,
                                               .ProductType_ID = ProductList.ProductType_ID,
                                               .ProductType_Name = If(ProductList.ProductType_ID Is Nothing, "", ProductList.ProductType.NAME),
                                               .ProductDept_ID = If(ProductList.ProductType Is Nothing, Nothing, ProductList.ProductType.ProductDept),
                                               .ProductDept_Name = If(ProductList.ProductType Is Nothing, "", (If(ProductList.ProductType.ProductDepts Is Nothing, "", ProductList.ProductType.ProductDepts.NAME))),
                                               .SageDescription = ProductList.SageDescription,
                                               .SeasonCode = ProductList.SeasonCode,
                                               .Season_Name = If(ProductList.SeasonCode Is Nothing, "", ProductList.Season.NAME),
                                               .StrikeOffNR = ProductList.StrikeOffNR,
                                               .Supplier_Code = ProductList.Supplier_Code,
                                               .Supplier_Name = If(ProductList.Supplier_Code Is Nothing, "", ProductList.Supplier.NAME),
                                               .TransfersNR = ProductList.TransfersNR,
                                               .Deleted = ProductList.Deleted,
                                               .LastUpdateDate = ProductList.LastUpdateDate,
                                               .LastUpdatedBy = If(ProductList.LastUpdateUserCode Is Nothing, "", ProductList.LastUpdateUser.First_Name & " " & ProductList.LastUpdateUser.Last_Name),
                                               .LastUpdateUserCode = ProductList.LastUpdateUserCode,
                                               .ProductComponents = If(ProductList.ProductComponents.Count > 0, GetProductComponentsByPrimaryName(ProductList.ProductComponents, "Component"), New ObservableCollection(Of FriendlyProductComponents)),
                                               .ProductPackaging = If(ProductList.ProductComponents.Count > 0, GetProductComponentsByPrimaryName(ProductList.ProductComponents, "Packaging"), New ObservableCollection(Of FriendlyProductComponents)),
                                               .ProductStrikeOffs = If(ProductList.ProductComponents.Count > 0, GetProductComponentsByPrimaryName(ProductList.ProductComponents, "Strike Off"), New ObservableCollection(Of FriendlyProductComponents)),
                                               .ProductTransfers = If(ProductList.ProductComponents.Count > 0, GetProductComponentsByPrimaryName(ProductList.ProductComponents, "Transfers"), New ObservableCollection(Of FriendlyProductComponents)),
                                               .ProductStockItems = If(ProductList.Product_Stock_Item.Count > 0, GetProductStockItems(ProductList.Product_Stock_Item), New ObservableCollection(Of FriendlyProductStockItems))
                                               }).Where(Function(x) x.Deleted = False Or x.Deleted Is Nothing)

GetProductComponentsByPrimaryName调用一个函数，该函数只按类型过滤组件并返回一个Friendly ObservableCollection。

因此每个相关的组件和产品库存项目都作为ObservableCollection返回，我可以与之交互......

对于长篇帖子感到抱歉！

编辑 - 08-03-13：

我上面没有解决这个问题，但我设法告诉客户他们不应该检索所有结果，然后依靠用户进行过滤。

这也让我重新调整了我的Filtering例程，以便在数据库上执行Filtering，而不是在本地执行。这两个因素都意味着下面的查询现在以合理的速度运行。

我尝试手动填充我的实体，但这比Linq为我生成的查询花了更长的时间。

其中一天或许我会重新审视这个问题，看看我能学到什么。但就目前而言，我已经回避了它！

Answer 1

创建一个执行相同查询的存储过程，并将结果作为新实体类型返回，如果可以摆动它，则返回FriendlyColours。你是对的，这样做就像生猪一样。不确定我还能添加什么。

Answer 2

该查询将通过线路产生大量数据。您应该首先投射到仅包含您需要的数据的实体。根据您的数据需求，这可能无济于事。

SQL在运行简单查询时通常非常快速，因此您可以尝试单独加载每个集合，然后在代码中将实体存储起来。这将有效减少转移的数据量。

要解释为什么像这样的加入会破坏你的表现，这是一个简单的例子：

在我的测试数据库中，我有三个表，数据非常少，但你仍然可以看到模式。

首先是个人查询

SELECT *  FROM [OPath-dev].[dbo].[Groups] g

1;Hästhovarna;nzb5x50vibb;0;NULL;NULL;0

一行。根据记事本++的39个字符

SELECT * FROM [OPath-dev].[dbo].[GroupMemberships]

1;1;1
2;1;0

两行。 12个字符

SELECT * FROM [OPath-dev].[dbo].[Blogs] where id > 5

包含字段的3行;

标题
介绍;
体;
PublishDate;
创建;
CreatorIP;
创建者;
编辑;
编辑器;
EditorIP

，共5907个字符

加入两个简单的表格

  SELECT *
  FROM [OPath-dev].[dbo].[Groups] g
  JOIN [OPath-dev].[dbo].[GroupMemberships] gm on gm.GroupId = g.Id

1;Hästhovarna;nzb5x50vibb;0;NULL;NULL;0;1;1;1
1;Hästhovarna;nzb5x50vibb;0;NULL;NULL;0;2;1;0

现在长度为96个字符。如果在单独的查询中运行这两个，那么它将是39 + 12 = 51（这可能更快，因为差异很小）。

加入所有三个表格

SELECT *
  FROM [OPath-dev].[dbo].[Groups] g
  JOIN [OPath-dev].[dbo].[GroupMemberships] gm on gm.GroupId = g.Id
  JOIN [OPath-dev].[dbo].[Blogs] b on b.Id > 5

响应是6行，其中包含列：

标识;
名称;
JoinCode;
IsCompetitionClub;
SourceSystemKey_SystemKey;
SourceSystemKey_EntityId;
SourceSystemKey_HasValue;
用户ID;
的GroupId;
IsAdministrator
ID
标题
介绍;
体;
PublishDate;
创建;
CreatorIP;
创建者;
编辑;
编辑器;
EditorIP

现在的响应是11954个字符长，我们突然为连接付出了相当大的代价。特别是如果数据库位于同一台机器上或真正快速的网络上。

现在这是一个不好的例子。我有更好的数据集，可以显示我的其他计算机上更糟糕的增长。并且记得你正在加入更多的列，这些列将最终传输大量的数据。如果它是一个Windows应用程序，并且您通过WAN连接到数据库将是一个严重的问题，但即使在本地计算机上，您也可以看到如果您进行配置文件，则转移不是免费的。

从断开的EF5上下文中实现“友好”实体

2 个答案: