2011-09-28 48 views
3

我有一个具有以下结构的数据表。在VB.Net中过滤数据表

mid mname  version baseID 
------------------------------------ 
1  tag3   1  1 
2  tag3   2  1 
3  tag3   3  1 
4  tag5   1  4 
5  tag5   2  4 
6  tag6   1  6 

从上面的结构我需要一个类似这样的数据表。 我需要从数据表中取最高版本。

mid mname  version baseID 
------------------------------------ 
3  tag3   3  1 
5  tag5   2  4 
6  tag6   1  6 

如何创建类似上面的数据表。 我正在使用Vb.Net

在此先感谢。

+0

我不能修改查询。(SQL部分) – Coderr

回答

0

我用

Datatables.Compute()来获得使用GROUP MAX值通过

Function GroupBy(ByVal i_sGroupByColumn As String, ByVal i_sAggregateColumn As String, ByVal i_dSourceTable As DataTable) As DataTable 

     Dim dv As New DataView(i_dSourceTable) 

     'getting distinct values for group column 
     Dim dtGroup As DataTable = dv.ToTable(True, New String() {i_sGroupByColumn}) 
     'adding column for the row count 
     dtGroup.Columns.Add("Max_Version", GetType(Double)) 

     'looping thru distinct values for the group, counting 
     For Each dr As DataRow In dtGroup.Rows 
      dr("Max_Version") = i_dSourceTable.Compute("MAX(" & i_sAggregateColumn & ")", i_sGroupByColumn & " = '" & dr(i_sGroupByColumn) & "'") 

     Next 

     'returning grouped/counted result 
     Return dtGroup 
    End Function 
2

这取决于你如何填充原始数据表。如果你是通过查询数据库做我会格式化结果在查询本身是这样设置:

(SQL)

select mid, mname, version, baseID 
from <table> t 
Join (select baseid, max(version) as version 
     from <table> group by baseID)maxVersion 
    on maxVersion.baseid = t.baseid and maxVersion.version = t.version 

这将其放入数据表之前格式化数据。

如果数据表由其他方式填充,并且需要过滤它,然后将其放入另一个数据表中。那么一个简单的方法来做到这一点(假设你的数据表上总是整理以上述方式)是:

for i as integer = 0 to datatable.rows.count - 1 
    if i < datatable.rows.count - 1 Then 
     if datatable.rows(i)(4).value <> datatable.rows(i+1)(4).value then 
      newDataTable.rows.Add(datatable.rows(i).itemArray()) 
     End If 
    Else 
     newDataTable.rows.Add(datatable.rows(i).itemArray()) 
    End if 
Next 

现在的语法可能会关闭在这里或那里(写在notpad),但逻辑的想法那里。假设每次都有相同的格式,那么我将检查行更改为新的baseid并将该行添加到新的数据表。从你发布的例子看来,特定baseid的最大版本是该baseid的最后一行。

克里斯

+0

感谢UR答案。我无法修改查询。(SQL部分) – Coderr

+0

您提供的解决方案不起作用。索里让你失望:( – Coderr