以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何即时更新 数据表字典 和 启用输入助手的列表项目 内容啊  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=9836)

--  作者:天下无光
--  发布时间:2011/5/10 11:07:00
--  [求助]如何即时更新 数据表字典 和 启用输入助手的列表项目 内容啊

如题。

 

现在要关闭后重新打开软件数据才会更新,要如何弄呢?求助!!


--  作者:狐狸爸爸
--  发布时间:2011/5/10 11:09:00
--  

可以动态设置啊:

 

http://help.foxtable.com/topics/1836.htm

 

 


--  作者:天下无光
--  发布时间:2011/5/10 13:16:00
--  

数据字典那里也搞个 显示代码 就好了!!图片点击可在新窗口打开查看


--  作者:天下无光
--  发布时间:2011/5/10 14:01:00
--  
狐爸!启用输入助手的列表项目 如何动态设置啊!
--  作者:狐狸爸爸
--  发布时间:2011/5/10 14:25:00
--  

看看这个:

 

http://help.foxtable.com/topics/1457.htm

 


--  作者:天下无光
--  发布时间:2011/5/10 16:58:00
--  

还是不行!!!

 

例程是这样的

If MainTable.Name = "订单" Then \'如果选择的主表是订单表
Tables("订单").Cols("客户").Combolist = DataTables("客户").GetComboListString("公司名称")
End
If

 

但我要的是子表

例如:

If MainTable.Name = "订单.订单明细" Then
Tables("订单.订单明细").Cols("产品编号").Combolist = DataTables("产品").GetComboListString("产品编号")
End
If

好像上述代码不行,求救!!

另外触发条件 例程是如果选择的主表是订单表,我的例子的触发条件是什么好呢?

[此贴子已经被作者于2011-5-10 17:23:14编辑过]

--  作者:狐狸爸爸
--  发布时间:2011/5/10 17:26:00
--  

MainTable是主表,关联表用CurrentTableChanged事件:
 
If currentTable.Name = "订单.订单明细" Then
       Tables("订单.订单明细").Cols("产品编号").Combolist = DataTables("产品").GetComboListString("产品编号")
End If
 
主表和活动表:
 
http://help.foxtable.com/topics/0436.htm

 

http://help.foxtable.com/topics/0663.htm

 

http://help.foxtable.com/topics/0664.htm

 

[此贴子已经被作者于2011-5-10 17:27:59编辑过]

--  作者:天下无光
--  发布时间:2011/5/10 20:21:00
--  

If CurrentTable.DataTable.Name = "销售订单.销售订单明细" Then 

    CurrentTable.Cols("产品编号").Combolist = DataTables("产品").GetComboListString("产品编号")
End If

 

还是不行,是不是还有错误啊,没有列表啊??求救!!!!!!!!!

Tables("销售订单.销售订单明细" ).Cols("产品编号").Combolist = DataTables("产品").GetComboListString("产品编号")

也没有用!!


--  作者:mr725
--  发布时间:2011/5/10 20:56:00
--  

如果这个表是可见的:

Tables("销售订单.销售订单明细" ).focus

CurrentTable.Cols("产品编号").Combolist = DataTables("产品").GetComboListString("产品编号")


--  作者:天下无光
--  发布时间:2011/5/10 22:06:00
--  

原来老大也会犯错啊!终于搞定了,原来子表名不能用 父表名.子表名 而是用 子表名 就行了

 

If CurrentTable.DataTable.Name = "销售订单明细" Then
    CurrentTable.Cols("产品编号").Combolist = DataTables("产品").GetComboListString("产品编号")
End If