以文本方式查看主题 - 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编辑过]
|