- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]列关联？已上传问题图片 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=160218)
-- 发布时间：2021/1/25 10:06:00
-- [求助]列关联？已上传问题图片
狐表加入了一个外部数据源，包含了名称和id字段
在狐表列中如何取外表中的名称字段，可以让id列自动出来对应的id？
此主题相关图片如下：外部表.png
此主题相关图片如下：问题.png
[此贴子已经被作者于2021/1/25 10:47:01编辑过]
-- 发布时间：2021/1/25 10:14:00
--
没看懂，截图说明一下
-- 发布时间：2021/1/25 10:48:00
--
已经贴图~望回复
-- 发布时间：2021/1/25 10:53:00
--
参考：http://www.foxtable.com/webhelp/topics/2490.htm
-- 发布时间：2021/1/25 10:59:00
--
并不能实现我想要的功能。
已经引用外部表。
名称那一列引用了外部表中名称字段。
我想要在列中选中名称字段，然后在“物料代码”列那里会出来对应的代码
-- 发布时间：2021/1/25 11:16:00
--
肯定可以实现！写了什么代码，有什么错误？
-- 发布时间：2021/1/25 11:38:00
--
If e.DataCol.Name = "名称" Then
e.DataRow("物料代码") = DataTables("t_ICItemCore").Compute("[Fname]","[Fnumber] = \'" & e.NewValue & "\'")
End If
-- 发布时间：2021/1/25 11:44:00
--
If e.DataCol.Name = "名称" Then
Dim dr As DataRow = DataTables("t_ICItemCore").Find("Fnumber = \'" & e.NewValue & "\'")
If dr IsNot Nothing Then
e.DataRow("物料代码") = dr("Fname")
If dr IsNot Nothing Then
e.DataRow("物料代码") = dr("Fname")
else
e.DataRow("物料代码") = nothing
End If
End If
-- 发布时间：2021/1/25 11:53:00
--
在“车载录像系统” 表属性 的 DataColChanged 事件设置为以上代码。
没有作用。输入“名称”以后 ，“物料代码”不会自动出来
-- 发布时间：2021/1/25 12:01:00
--
t_ICItemCore表有加载这个名称的数据了吗？