Foxtable(狐表)用户栏目专家坐堂 → 逻辑自动复制行,删除行


  共有2501人关注过本帖树形打印复制链接

主题:逻辑自动复制行,删除行

帅哥哟,离线,有人找我吗?
nmxmnxf
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:14 积分:321 威望:0 精华:0 注册:2009/11/6 11:22:00
逻辑自动复制行,删除行  发帖心情 Post By:2019/1/3 11:04:00 [显示全部帖子]

If e.DataCol.Name = "加入台帐" AndAlso e.DataRow("加入台帐") = True Then
    Dim nma() As String = {"记录编号","巡查日期","巡查项目","巡查线路","发现违法情况","备注"} 'A表数据来源列
    Dim nmb() As String = {"记录编号","巡查日期","巡查内容","巡查路线","发现违法情况","备注"} 'B表数据接收列
    Dim dr As DataRow = DataTables("巡查台帐").AddNew
    For i As Integer = 0 To nma.Length - 1
        dr(nmb(i)) = e.DataRow(nma(i))
    Next
End If


以上代码可以实现逻辑复制行到台帐表,但如何实现逻辑列由true 变为false时再删除巡查台帐中刚新增的行?看论坛上有同样的贴子,但加入那行代码,不成功,希望帮助写下代码。急等中..........

 回到顶部
帅哥哟,离线,有人找我吗?
nmxmnxf
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:14 积分:321 威望:0 精华:0 注册:2009/11/6 11:22:00
完美解决,非常感谢  发帖心情 Post By:2019/1/3 11:32:00 [显示全部帖子]

完美解决,非常感谢!!!

 回到顶部