以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 如何判断新增行数  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=30653)

--  作者:lsy
--  发布时间:2013/4/1 16:27:00
--  [求助] 如何判断新增行数

在代码中,如何判断新增了多少行?


--  作者:Bin
--  发布时间:2013/4/1 16:37:00
--  
定义个全局变量统计一下。
--  作者:lsy
--  发布时间:2013/4/1 16:48:00
--  
以下是引用Bin在2013-4-1 16:37:00的发言:
定义个全局变量统计一下。

应该还有更好的办法。


--  作者:Bin
--  发布时间:2013/4/1 16:51:00
--  
以下是引用lsy在2013-4-1 16:48:00的发言:

应该还有更好的办法。

或者循环行判断RowState 是否为Added
--  作者:lsy
--  发布时间:2013/4/1 16:56:00
--  
以下是引用Bin在2013-4-1 16:51:00的发言:

或者循环行判断RowState 是否为Added

我写来写去,没搞定。不是脑筋急转弯,而是脑瓜鸡啄弯。


--  作者:Bin
--  发布时间:2013/4/1 17:02:00
--  
以下是引用lsy在2013-4-1 16:56:00的发言:

我写来写去,没搞定。不是脑筋急转弯,而是脑瓜鸡啄弯。

Dim c As Integer For i As Integer= 0 To DataTables("表A").DataRows.Count-1 If DataTables("表A").DataRows(i).RowState=DataRowState.Added Then c=c+1 End If Next Output.Show(c)
--  作者:Bin
--  发布时间:2013/4/1 17:02:00
--  
Dim c As Integer
For i As Integer= 0 To DataTables("订单").DataRows.Count-1
    If DataTables("订单").DataRows(i).RowState=DataRowState.Added Then
      c=c+1
    End If 
Next
Output.Show(c)
[此贴子已经被作者于2013-4-1 17:02:37编辑过]

--  作者:lsy
--  发布时间:2013/4/1 17:12:00
--  
以下是引用Bin在2013-4-1 17:02:00的发言:
Dim c As Integer
For i As Integer= 0 To DataTables("订单").DataRows.Count-1
    If DataTables("订单").DataRows(i).RowState=DataRowState.Added Then
      c=c+1
    End If 
Next
Output.Show(c)
[此贴子已经被作者于2013-4-1 17:02:37编辑过]

试用一下,很好,特别致谢。

本来写的有点样了,脑袋一木,啥都废了。

 

请各位狐友注意劳逸结合,不然会事倍功半。

这就休息去了。

[此贴子已经被作者于2013-4-1 17:53:35编辑过]