- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]非关联表多列相同，跨表修改 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=126219)
-- 发布时间：2018/10/16 19:21:00
-- [求助]非关联表多列相同，跨表修改
非关联表多列相同，跨表修改
表A修改学时，假如表B中的 学年、学期、课程 这3列同表A值一样，表B中的学时全部同步更新，求助
此主题相关图片如下：非关联表多列相同，跨表修改.png
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:多条件跨表引用.table |
[此贴子已经被作者于2018/10/16 19:21:47编辑过]
-- 发布时间：2018/10/16 20:38:00
--
表A，datacolchanged
Select Case e.DataCol.Name
Case "学时"
If e.DataRow.IsNull("学时") = False Then
Dim dr As DataRow
DataTables("表B").ReplaceFor("学时",e.NewValue,"课程 = \'" & dr("课程") & "\' And 年级 = \'" & dr("年级") & "\' And 学期 = \'" & dr("学期") & "\'")
End If
End Select
-- 发布时间：2018/10/16 22:20:00
-- 回复：（有点蓝）表A，datacolchangedSelect Case e.D...
大师， 上面代码无效，辛苦再看看了
-- 发布时间：2018/10/16 22:28:00
--
Select Case e.DataCol.Name
Case "学时"
If e.DataRow.IsNull("学时") = False Then
Dim dr As DataRow = e.DataRow
DataTables("表B").ReplaceFor("学时",e.NewValue,"课程 = \'" & dr("课程") & "\' And 年级 = \'" & dr("年级") & "\' And 学年 = \'" & dr("学期") & "\'")
End If
End Select
-- 发布时间：2018/10/16 22:40:00
-- 回复：（有点蓝）Select Case e.DataCol.Name? &...
窗口里修改还是报错，直接在表A里也不可以修改 学时
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:多条件跨表引用.table |
此主题相关图片如下：报错.png
[此贴子已经被作者于2018/10/16 22:40:06编辑过]
-- 发布时间：2018/10/16 22:52:00
--
我测试没有问题。什么步骤测试会出错？
-- 发布时间：2018/10/16 22:53:00
--
学时列类型有问题，只能输入0~255之间的数字.
-- 发布时间：2018/10/16 23:10:00
-- 回复：（有点蓝）学时列类型有问题，只能输入0~255之间...
如果不是0-255,
字符类型，代码怎么改呢？
-- 发布时间：2018/10/16 23:11:00
--
不需要改