Foxtable(狐表)用户栏目专家坐堂 → 代码问题


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

主题:代码问题

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


加好友 发短信
等级:二尾狐 帖子:524 积分:3676 威望:0 精华:0 注册:2012/7/27 10:28:00
代码问题  发帖心情 Post By:2019/2/1 15:09:00 [只看该作者]

请问我有两个窗口分别为“员工信息”与“员工编辑”

1,员工信息窗口里有2个sqltable分别为“员工调动记录表”,“员工信息”

2,员工编辑窗口里有1个sqltable名称为“员工调动记录”和员工信息控件

 
图片点击可在新窗口打开查看此主题相关图片如下:sql问题1.jpg
图片点击可在新窗口打开查看

 
图片点击可在新窗口打开查看此主题相关图片如下:sql问题2.jpg
图片点击可在新窗口打开查看

 
图片点击可在新窗口打开查看此主题相关图片如下:sql问题3.jpg
图片点击可在新窗口打开查看

3,在打开员工信息窗口后,双击SQLtable"员工信息"后,弹出员工编辑窗口,在窗口里显示目标员工的信息。同时需要在员工编辑窗口里的sqltable“员工调动记录”显示该员工相关的调动记录

4,需要注意的是sqltable“员工调动记录”和SQLtable"员工信息"不变的只有"员工信息"_Identify:“员工调动记录”序号 和 两个表的员工姓名是相同的

请问这个sqltable“员工调动记录”的代码怎么?写哪里?

 





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


加好友 发短信
等级:超级版主 帖子:106054 积分:539363 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/2/1 15:15:00 [只看该作者]

员工编辑窗口afterload事件处理即可。

如果是表事件,在窗口设计点击窗口表,到右边事件页里写

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


加好友 发短信
等级:二尾狐 帖子:524 积分:3676 威望:0 精华:0 注册:2012/7/27 10:28:00
  发帖心情 Post By:2019/2/1 17:10:00 [只看该作者]

请问这个sqltable“员工调动记录”的代码怎么写?试了半天没搞出来
[此贴子已经被作者于2019/2/1 17:10:26编辑过]

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


加好友 发短信
等级:超级版主 帖子:106054 积分:539363 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/2/1 22:24:00 [只看该作者]

请上传具体实例说明

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


加好友 发短信
等级:二尾狐 帖子:524 积分:3676 威望:0 精华:0 注册:2012/7/27 10:28:00
  发帖心情 Post By:2019/2/2 15:51:00 [只看该作者]

Dim r As Row = Tables("员工信息_员工信息").Current
Dim dr As DataRow
dr = DataTables("员工编辑_员工调动记录").Find("[序号] = '" & r([_Identify]) & "'")

这个不知道为什么,好像不能用

能不能帮我改一下


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


加好友 发短信
等级:超级版主 帖子:106054 积分:539363 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/2/2 15:59:00 [只看该作者]

dr = DataTables("员工编辑_员工调动记录").Find("[序号] = " & r("_Identify") )

不建议使用_Identify进行业务的关联,会有很多问题

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


加好友 发短信
等级:二尾狐 帖子:524 积分:3676 威望:0 精华:0 注册:2012/7/27 10:28:00
  发帖心情 Post By:2019/2/2 16:52:00 [只看该作者]

怎么筛选不行?

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


加好友 发短信
等级:超级版主 帖子:106054 积分:539363 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/2/2 17:12:00 [只看该作者]

以下是引用hongyefor在2019/2/2 16:52:00的发言:
怎么筛选不行?

请描述详细的问题,贴出代码或者上传实例说明

 回到顶部