Foxtable(狐表)用户栏目专家坐堂 → 关于自动复制行的问题


  共有1869人关注过本帖平板打印复制链接

主题:关于自动复制行的问题

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


加好友 发短信
等级:婴狐 帖子:25 积分:277 威望:0 精华:0 注册:2016/7/11 21:17:00
关于自动复制行的问题  发帖心情 Post By:2016/7/30 10:27:00 [只看该作者]

请问一下,假如外部数据库中有一个表T211和表T212,表T211中每增加一行数据或每修改一行数据都会在表T212中保存(也就是表T212是表T211的历史纪录库)
但是现在问题是我的表示在外部数据源中的,而且表T211中的数据是不断自动更新的(不打开foxtable时也在不断更新),我想一打开foxtable就把foxtable没有运行那段时间产生的数据(此时数据在表T211中)复制到表T212中去,
那么我的代码该如何修改?
Dim dr As DataRow = DataTables("T212").AddNew
For Each dc As DataCol In DataTables("T212").DataCols
    
    dr("T212CT") = e.DataRow("T211CT")
    dr("T212UT") = e.DataRow("T211UT")
    dr("T212DL") = e.DataRow("T211DL")
    dr("T212UserId") = e.DataRow("T211UserId")
    dr("T212DeptId") = e.DataRow("T211DeptId")
    dr("T212PointId") = e.DataRow("T211PointId")
    dr("F2423") = e.DataRow("F2415")
    dr("F2424") = e.DataRow("F2416")
    dr("F2425") = e.DataRow("F2417")
    dr("F2426") = e.DataRow("F2418")
    dr("F2427") = e.DataRow("F2419")
    dr("F2428") = e.DataRow("F2420")
    dr("T212Id") = e.DataRow("T211Id")
        
Next

 回到顶部