目录树下相同的名称在不同的根下如何判断是属于哪个根节下 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Select Case e.node.text

Case "客户管理"

forms("个人客户").open

Case "客户管理\个人客户\从未联系"

forms("个人客户").show

Tables("个人客户信息").Filter="姓名 not in ('" & DataTables("个人联系记录").GetComboListString("姓名","联系时间 Is not null").replace("|","','") & "')"

Case "客户管理\个人客户\超45天未联系"

forms("个人客户").show

Tables("个人客户信息").Filter="姓名 not in ('" & DataTables("个人联系记录").GetComboListString("姓名","联系时间 > = #" & Date.Today.adddays(-45) & "#").replace("|","','") & "')"

Case "客户管理\个人客户\联系过期未联系"

forms("个人客户").show

Tables("个人客户信息").Filter="姓名 not in ('" & DataTables("个人联系记录").GetComboListString("姓名","已联系=false").replace("|","','") & "')"

Case "客户管理\单位客户\从未联系"

forms("单位客户").show

Tables("单位客户信息").Filter="单位名称 not in ('" & DataTables("企业拜访记录").GetComboListString("单位名称","联系时间 Is not null").replace("|","','") & "')"

Case "客户管理\单位客户\联系过期未联系"

forms("单位客户").show

Tables("单位客户信息").Filter="单位名称 not in ('" & DataTables("企业拜访记录").GetComboListString("单位名称","已联系=false").replace("|","','") & "')"

Case "客户管理\单位客户\超45天未联系"

forms("单位客户").show

Tables("单位客户信息").Filter="单位名称 not in ('" & DataTables("企业拜访记录").GetComboListString("单位名称","联系时间 > = #" & Date.Today.adddays(-45) & "#").replace("|","','") & "')"

Case "客户管理\客户生日"

forms("单位客户") .close

forms("生日提醒").show

主题：目录树下相同的名称在不同的根下如何判断是属于哪个根节下