主题：BOM目录树,高手请看

此主题相关图片如下：snap10.jpg

此主题相关图片如下：snap11.jpg

此主题相关图片如下：snap12.jpg

第一问题：图1中的BOM更改数据表用哪种方式可以实现？

第二问题：图2中用目录树做成窗口菜单如图3，前三列为目录树内容，请问如何执行对应图2第五列中的命令代码？

1、看不懂

2、节点有Fullpath属性，返回其路径，例如“计划工作站\基础数据管理\制造Bom管理”，根据这个找出命令行。

3、代码要编译才能执行，所以你这种方式不合适，应该将命令代码改为窗口名，然后：

Dim dr As DataRow

'找出dr

Forms(dr("窗口名")).Open()

大概就是这样，具体自己琢磨

希望用目录树的方式对BOM进行更改，添加或删除，只不过多了料号描述和单耗这样的附加列

第二个问题，不知道老大您的程序中，code.mdb文件是如何与程序结合的，我发现在程序中双击其中的某行，就能找出对应的命令代码内容，而且假如不是打开窗口，而是要执行操作，那么上述代码就不行了

1、通过目录树定位到对应的行，再打开窗口编辑，和常规的方法一样。

2、或者你用自定义函数，表中只保留函数名，这样就可以解决代码执行的问题。