以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何实现关联  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=102572)

--  作者:qqxydm
--  发布时间:2017/6/22 13:35:00
--  如何实现关联

请我各位大神,如何在第一张表的列勾选姓名了之后,第二张表的列会自动改为值班


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170622133053.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170622133158.png
图片点击可在新窗口打开查看

--  作者:有点色
--  发布时间:2017/6/22 15:09:00
--  

DataColChanged事件

 

If e.DataCol.name = "第一列" Then
    If e.OldValue <> Nothing Then
        For Each s As String In e.OldValue.split(",")
            DataTables("表B").ReplaceFor("第二列", "值班", "第一列 = \'" & s & "\'")
        Next
    End If
    If e.NewValue <> Nothing Then
        For Each s As String In e.newValue.split(",")
            DataTables("表B").ReplaceFor("第二列", "值班", "第一列 = \'" & s & "\'")
        Next
    End If
End If


--  作者:qqxydm
--  发布时间:2017/6/22 15:35:00
--  
我把它放在了第一张表的事件里,但是还是没用啊
--  作者:qqxydm
--  发布时间:2017/6/22 15:40:00
--  
除了表名改成自己的,列需要改吗,版主大大
--  作者:有点色
--  发布时间:2017/6/22 15:53:00
--  
 代码测试没问题,如果还有问题,上传具体实例看看。
--  作者:qqxydm
--  发布时间:2017/6/22 16:11:00
--  
代码如图一,两列都是数据列,但是输入了之后还是没反应
--  作者:有点色
--  发布时间:2017/6/22 16:50:00
--  
以下是引用qqxydm在2017/6/22 16:11:00的发言:
代码如图一,两列都是数据列,但是输入了之后还是没反应

 

重置列 http://www.foxtable.com/webhelp/scr/1469.htm

 


--  作者:qqxydm
--  发布时间:2017/6/22 21:09:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170622210058.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170622210122.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170622210141.png
图片点击可在新窗口打开查看
这是本次的实际操作和所有表的截图,在重置列之后还是没有用,版主大大再帮我看看存在什么问题
--  作者:有点色
--  发布时间:2017/6/22 23:46:00
--  
 

If e.DataCol.name = "处理人员" Then
    If e.OldValue <> Nothing Then
        For Each s As String In e.OldValue.split(",")
            DataTables("应急人员信息").ReplaceFor("状态", "值班", "姓名 = \'" & s & "\'")
        Next
    End If
    If e.NewValue <> Nothing Then
        For Each s As String In e.newValue.split(",")
            DataTables("应急人员信息").ReplaceFor("状态", "值班", "姓名 = \'" & s & "\'")
        Next
    End If
End If


--  作者:qqxydm
--  发布时间:2017/6/23 13:24:00
--  
谢谢版主大大,有用了,当处理人员的勾去掉之后是否有代码能让状态回到在岗呢,以及是否能实现指挥系统表下面的关联表不显示休息状态的人员和处理人员里的勾选项也不显示休息状态的,实在麻烦您了,当初没考虑到这一点,附件是目前的系统
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:应急管理系统.table