Foxtable(狐表)用户栏目专家坐堂 → 增加的列


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

主题:增加的列

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


加好友 发短信
等级:小狐 帖子:354 积分:4345 威望:0 精华:0 注册:2016/4/30 10:41:00
增加的列  发帖心情 Post By:2024/5/10 8:32:00 [只看该作者]

如何在B表后增加的列内填入A表中同名列的数据

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110560 积分:562690 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/5/10 8:55:00 [只看该作者]


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


加好友 发短信
等级:小狐 帖子:354 积分:4345 威望:0 精华:0 注册:2016/4/30 10:41:00
  发帖心情 Post By:2024/5/10 11:31:00 [只看该作者]

下面这段代码不知错在哪,B表中的数据填不上
If e.DataCol.Name = "客户来源" Then 
    Dim dr As DataRow
    '否则在产品表查找同名的产品行,将找到的行赋值给变量dr
    dr = DataTables("接单登记").Find("[接单单号] = '" & e.DataRow("接单单号") & "'")
    If dr IsNot Nothing Then '如果找到了同名的产品行,也就是dr不是Nothing
        e.DataRow("客户来源") = dr("客户来源")
    End If
End If
A表是接单登记 B表是发货表,上边代码是在B表写的
批量把A表中客户来源列的数据赋值到B表发货表中的客户来源列

[此贴子已经被作者于2024/5/10 11:34:39编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110560 积分:562690 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/5/10 11:46:00 [只看该作者]

If e.DataCol.Name = "客户来源" Then 
改为
If e.DataCol.Name = "接单单号" Then 

然后B表旧数据重置一次 "接单单号"

 回到顶部