以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 目录树下相同的名称在不同的根下如何判断是属于哪个根节下 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=119740) |
-- 作者:wjliu -- 发布时间:2018/5/31 9:18:00 -- 目录树下相同的名称在不同的根下如何判断是属于哪个根节下 设计了一个目录树 如图 在nodemouseclick里如何来判断是个人客户下还是单位客户的从未联系,请指教
[此贴子已经被作者于2018/5/31 9:19:32编辑过]
|
-- 作者:有点甜 -- 发布时间:2018/5/31 9:24:00 -- 参考
http://www.foxtable.com/webhelp/scr/2690.htm
http://www.foxtable.com/webhelp/scr/1498.htm
|
-- 作者:wjliu -- 发布时间:2018/5/31 9:33:00 -- 上传项目 |
-- 作者:有点甜 -- 发布时间:2018/5/31 9:33:00 -- 认认真真看2楼啊,判断fullpath、fullname或者parentNode啊 |
-- 作者:wjliu -- 发布时间:2018/5/31 10:10:00 -- 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 |
-- 作者:有点甜 -- 发布时间:2018/5/31 10:11:00 -- Select Case e.node.text
改成
msgbox(e.node.FullPath) Select Case e.node.FullPath |
-- 作者:wjliu -- 发布时间:2018/5/31 10:12:00 -- 当我点客户管理\\个人客户\\从未联系时 就能从表中选出从未联系的客户 现在就是case 不会写 |
-- 作者:有点甜 -- 发布时间:2018/5/31 10:15:00 -- 看6楼。 |
-- 作者:wjliu -- 发布时间:2018/5/31 20:30:00 -- 谢谢 各位帮忙 问题搞定了 |