以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]看帮助,把里面的代码复制到事件中。不成功啊  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=18921)

--  作者:hb512104355
--  发布时间:2012/4/21 13:31:00
--  [求助]看帮助,把里面的代码复制到事件中。不成功啊
看帮助里面的动态目录树列表,打开CaseStudy目录下的文件:动态目录树列表.Table
把帮助里面的代码复制到文件的相应的事件中。什么反应都没有~
什么情况?

--  作者:程兴刚
--  发布时间:2012/4/21 13:56:00
--  
要看什么代码,比如说,该代码判断了表名,而该文件根本没有这个表,自然就不执行了,出现各种问题都有可能!
--  作者:hb512104355
--  发布时间:2012/4/21 14:32:00
--  
以下是引用程兴刚在2012-4-21 13:56:00的发言:
要看什么代码,比如说,该代码判断了表名,而该文件根本没有这个表,自然就不执行了,出现各种问题都有可能!

帮助应该和

CaseStudy目录下的文件

一致吧?


--  作者:程兴刚
--  发布时间:2012/4/21 14:50:00
--  
以下是引用hb512104355在2012-4-21 13:31:00的发言:
……
把帮助里面的代码复制到文件的相应的事件中。什么反应都没有~
什么情况?

 

关键问题在这里,什么情况只有您知道,复制的哪里的代码,别人不清楚!


--  作者:hb512104355
--  发布时间:2012/4/21 16:04:00
--  
以下是引用程兴刚在2012-4-21 14:50:00的发言:

 

关键问题在这里,什么情况只有您知道,复制的哪里的代码,别人不清楚!

动态目录树列表

利用DropTreeBuilder,同样可以动态生成目录树列表。
本节的内容可以参考CaseStudy目录下的文件:动态目录树列表.Table

假定有一个“行政区域“表,结构如下:

我们希望在客户表输入数据的时候,能够根据该”行政区域“表自动生成目录树,用于输入省、县市、区号、邮编等列的内容。

为此可以在项目的AfterOpenProject事件中加入代码:

Dim tb As New DropTreeBuilder
tb.SourceTable = DataTables(
"行政区域") \'指定目录树表
tb.TreeCols =
"省|县市" \'指定用于生成目录树的列
tb.SourceCols =
"省|县市|区号|邮编" \'指定数据来源列
tb.ReceiveCols =
"省|县市|区号|邮编" \'指定数据接收列
Tables
("客户").Cols("省"
).DropTree = tb.Build()

 

 

这个是帮助文件的~

打开的是:动态目录树列表.Table

在AfterOpenProject事件中加入代码:

 

Dim tb As New DropTreeBuilder
tb.SourceTable = DataTables(
"行政区域") \'指定目录树表
tb.TreeCols =
"省|县市" \'指定用于生成目录树的列
tb.SourceCols =
"省|县市|区号|邮编" \'指定数据来源列
tb.ReceiveCols =
"省|县市|区号|邮编" \'指定数据接收列
Tables
("客户").Cols("省"
).DropTree = tb.Build()

[此贴子已经被作者于2012-4-21 16:05:36编辑过]

--  作者:程兴刚
--  发布时间:2012/4/21 16:37:00
--  

您在客户表的省那一列选择输入试试,没试怎么知道啊,我测试可以,您为什么就不行?

 

有图为证:

 

 


图片点击可在新窗口打开查看此主题相关图片如下:5.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2012-4-21 16:39:45编辑过]

--  作者:狐狸爸爸
--  发布时间:2012/4/23 7:27:00
--  

如果没有反应,最好做个简单的例子发上来,大家才能帮你分析出为什么没有反应。