我有一段代码是放在datacolchanged里面的，当订单导入之后，在一级分类这个表里自动统计四种类型的数量
但是每次都是只统计了导入订单的第一行，而不是全部统计，怎么回事呢，各位大侠看看
代码：
Case "接单日期"
Dim dr As DataRow = DataTables("一级分类").Find("接单日期 =' " & e.DataRow("接单日期") & "'")
If dr Is Nothing Then
dr = DataTables("一级分类").AddNew()
dr("接单日期") = e.DataRow("接单日期")
dr("订单量") = DataTables("生产订单明细").Compute(" Sum(生产订单数量) " , "接单日期 =' " & e.DataRow("接单日期") & "' ")
dr("9901") = DataTables("生产订单明细").Compute(" Sum(生产订单数量) " , "接单日期 =' " & e.DataRow("接单日期") & "' And 物料分类='9901'")
dr("9902") = DataTables("生产订单明细").Compute(" Sum(生产订单数量) " , "接单日期 =' " & e.DataRow("接单日期") & "' And 物料分类='9902'")
dr("9903") = DataTables("生产订单明细").Compute(" Sum(生产订单数量) " , "接单日期 =' " & e.DataRow("接单日期") & "' And 物料分类='9903'")
dr("9904") = DataTables("生产订单明细").Compute(" Sum(生产订单数量) " , "接单日期 =' " & e.DataRow("接单日期") & "' And 物料分类='9904'")
End If
加好友 
发短信
Post By：2012/11/19 20:01:00 [只看该作者]
