Foxtable(狐表)用户栏目专家坐堂 → 逻辑列多选跨表复制


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

主题:逻辑列多选跨表复制

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


加好友 发短信
等级:一尾狐 帖子:494 积分:3908 威望:0 精华:0 注册:2019/1/13 10:12:00
逻辑列多选跨表复制  发帖心情 Post By:2021/7/21 17:42:00 [只看该作者]

老师,我设计了跨表复制,目前只能复制单行数据,我想增加一列逻辑列,选中的多行同时跨表复制,请您指导,以下是复制单行的代码:
Tables("现金日记账").AddNew()
Tables("现金日记账").Current("摘要") = Tables("原材料进货记录").Current("摘要")
Tables("现金日记账").Current("经办人") = Tables("原材料进货记录").Current("经办人")
[此贴子已经被作者于2021/7/21 17:42:41编辑过]

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


加好友 发短信
等级:超级版主 帖子:107523 积分:546900 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/7/22 8:38:00 [只看该作者]


dim r as row
for each dr as datarow = dataTables(""原材料进货记录").select("逻辑列=true")
r = Tables("现金日记账").AddNew()
r("摘要") = dr("摘要")
r("经办人") = dr("经办人")
next

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


加好友 发短信
等级:一尾狐 帖子:494 积分:3908 威望:0 精华:0 注册:2019/1/13 10:12:00
  发帖心情 Post By:2021/7/22 9:45:00 [只看该作者]

老师,提示第二行语法错误

for each dr as datarow = dataTables(""原材料进货记录").select("逻辑列=true")


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


加好友 发短信
等级:超级版主 帖子:107523 积分:546900 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/7/22 9:49:00 [只看该作者]

提示什么错误?逻辑列改为自己的列名

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


加好友 发短信
等级:一尾狐 帖子:494 积分:3908 威望:0 精华:0 注册:2019/1/13 10:12:00
  发帖心情 Post By:2021/7/22 9:59:00 [只看该作者]

老师,逻辑列我已经改了,提示:
编译错误,语法错误。然后是后面的这行代码

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


加好友 发短信
等级:超级版主 帖子:107523 积分:546900 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/7/22 10:10:00 [只看该作者]

for each dr as datarow in dataTables("原材料进货记录").select("逻辑列=true")

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


加好友 发短信
等级:一尾狐 帖子:494 积分:3908 威望:0 精华:0 注册:2019/1/13 10:12:00
  发帖心情 Post By:2021/7/22 10:23:00 [只看该作者]

ok,thanks!

 回到顶部