- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 筛选后赋值 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=169730)
-- 发布时间：2021/6/28 13:49:00
-- 筛选后赋值
后台筛选订单表，订单ID 后，打开窗口1 并将结果显示在 窗口1_Table1 并指定显示列
请教怎么写代码
Tables("窗口1_Table1").SetColVisibleWidth("日期|90|产品|120|客户|120|数量|60")
[此贴子已经被作者于2021/6/28 13:49:55编辑过]
-- 发布时间：2021/6/28 13:59:00
--
Tables("窗口1_Table1").fill("select * from {订单} where 订单ID=\'001\'","某数据源",false)
Tables("窗口1_Table1").SetColVisibleWidth("日期|90|产品|120|客户|120|数量|60")
-- 发布时间：2021/6/29 16:43:00
--
Forms("简讯窗口").Show
Dim Filter As String
Filter = "[岗位ID] = \'" & Tables("组织机构").current("岗位ID") & "\'"
MessageBox.Show(Filter)
Forms("简讯窗口").Controls("窗口1_Table11").Fill("S el ect * F rom {人才档案} Where " & Filter, False)
\'Tables("简讯窗口_Table1").SetColVisibleWidth("职员姓名|90|入职日期|120|性别|120|部门名称|60")
还是不行，不能赋值到窗口的表内
-- 发布时间：2021/6/29 16:51:00
--
代码放到窗口afterload事件
Dim Filter As String
Filter = "[岗位ID] = \'" & Tables("组织机构").current("岗位ID") & "\'"
MessageBox.Show(Filter)
Tables("简讯窗口_Table11").Fill("S el ect * F rom {人才档案} Where " & Filter, False)
Tables("简讯窗口_Table11").SetColVisibleWidth("职员姓名|90|入职日期|120|性别|120|部门名称|60")
-- 发布时间：2021/6/29 17:40:00
--
我是想放在组织机构表的
Click
单击单元格后执行
通过单击进行筛选人才档案， 并打开简讯窗 筛选后的数据显示在 简讯窗的Table11内
[此贴子已经被作者于2021/6/29 17:40:03编辑过]
-- 发布时间：2021/6/29 20:34:00
--
代码一样的，如果不行请上传实例说明
-- 发布时间：2021/6/29 22:14:00
--
[此贴子已经被作者于2021/6/29 23:03:15编辑过]
-- 发布时间：2021/6/29 22:35:00
--
意思是把点击的窗口表的那一行数据显示到另外一个窗口的控件里？搞半天和上面描述的问题没有半毛钱关系呀
如果不想绑定，直接给控件赋值，表格click事件
Forms("简讯窗口").Controls("label1").text = e.row("某某列")
-- 发布时间：2021/6/29 23:00:00
--
此主题相关图片如下：企业微信截图_20210629230242.png
要用表显示，显示岗位ID下的职员，就是关联的明细表内容显示出来在窗口表中
上边的表应该显示列("职员姓名|90|入职日期|120|性别|120|部门名称|60")内容 但是没有
Dim Filter As String
Filter = "[岗位ID] = \'" & Tables("组织机构").current("岗位ID") & "\'"
\'MessageBox.Show(Filter)
Forms("简讯窗口").Show
Tables("简讯窗口_Table11").Fill("Se lect * F rom {人才档案} Where " & Filter, False)
Tables("简讯窗口_Table11").SetColVisibleWidth("职员姓名|90|入职日期|120|性别|120|部门名称|60")
此主题相关图片如下：企业微信截图_20210629230210.png
此主题相关图片如下：企业微信截图_20210629230210.png[此贴子已经被作者于2021/6/29 23:03:50编辑过]
-- 发布时间：2021/6/29 23:08:00
--
请上传实例说明