Foxtable(狐表)用户栏目专家坐堂 → 表间转移


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

主题:表间转移

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


加好友 发短信
等级:六尾狐 帖子:1342 积分:9766 威望:0 精华:0 注册:2015/6/30 8:46:00
  发帖心情 Post By:2017/6/16 19:57:00 [显示全部帖子]

If e.DataRow("订单状态") = "取消订单" Then
Dim r As Row = Tables("表B").AddNew
    For Each c As Col In Tables("表B").Cols
       
        r(c.Name) = Tables("表A").Current(c.Name)
    Next
    Tables("表A").Current.Delete
End If

 回到顶部