Foxtable(狐表)用户栏目专家坐堂 → [求助]大神帮忙,多个表的指定数据更换!


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

主题:[求助]大神帮忙,多个表的指定数据更换!

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


加好友 发短信
等级:童狐 帖子:292 积分:1864 威望:0 精华:0 注册:2013/3/16 21:31:00
[求助]大神帮忙,多个表的指定数据更换!  发帖心情 Post By:2013/4/4 11:37:00 [只看该作者]

现有表A,有一列名状态,有若干个表文档001,文档002,文档003,…… 每个文档表同样有一列名状态。

需要在表A状态列张三的病假改为出勤,则其对应文档的状态列的所有病假自动替换为出勤,其他的不变。

同理在表A状态列把李四的出勤改为病假,则其对应文档的状态列的所有原为出勤的内容能自动替换为病假,其他的不变。

求大神帮忙!

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:替换1.table


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2013/4/6 9:17:00 [只看该作者]

设置表A的DataColChanged事件:

 

Select Case e.DataCol.name
    Case "状态"
        Dim nms() As String = {"文档001","文档002","文档003","文档004","文档005"}
        For Each nm As String  In nms
            DataTables(nm).ReplaceFor("状态",e.NewValue,"姓名 = '" & e.DataRow("姓名") & "'")
        Next
End Select


 回到顶部