以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助:打开筛选树失败  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=77328)

--  作者:tjzj_lyl
--  发布时间:2015/11/16 16:47:00
--  求助:打开筛选树失败

求助:打开筛选树失败

 


图片点击可在新窗口打开查看此主题相关图片如下:qq图片20151116164617.png
图片点击可在新窗口打开查看

--  作者:大红袍
--  发布时间:2015/11/16 16:54:00
--  
 你写代码打开筛选树的? 很明显你的列名写错了,不存在此列。
--  作者:tjzj_lyl
--  发布时间:2015/11/16 17:04:00
--  

项目刚加载时出现提示的,整个项目中我就这一个关于加载筛选的代码

 

Tables("开票收款表").Visible=True
MainTable=Tables("开票收款表")
Tables("开票收款表").OpenFilterTree("日期 YM")


--  作者:tjzj_lyl
--  发布时间:2015/11/16 17:05:00
--  
和单位名称是表达式有关吗?
--  作者:大红袍
--  发布时间:2015/11/16 17:11:00
--  

你去看看你的筛选树设置,去掉所有的勾选。

 

然后,你执行这句代码,是否报错?

 

Tables("开票收款表").OpenFilterTree("日期 YM")


--  作者:tjzj_lyl
--  发布时间:2015/11/16 17:25:00
--  
以前用还好使的 今天在项目启动项中加了用户权限和更改了单位名称来源父表 再测试就出现了提示 我在筛选树中只勾选了日期项的
--  作者:tjzj_lyl
--  发布时间:2015/11/16 17:27:00
--  
后来我在afterobjectload 项中删除代码 还是出现提示
--  作者:大红袍
--  发布时间:2015/11/16 17:27:00
--  
上传项目测试,不应该有问题。
--  作者:tjzj_lyl
--  发布时间:2015/11/16 17:27:00
--  
我在班车上 回去后我把代码你给看看
--  作者:tjzj_lyl
--  发布时间:2015/11/16 19:27:00
--  

LoadUserSetting中的事件


If User.Name = "管理员" Or User.Name = "开发者"  Then
    \'DataTables("基本信息表").LoadFilter = "单位名称<>\'公司\' and 单位名称<>\'天津公司\'"
   \' DataTables("开票收款表").LoadFilter = "单位名称<>\'公司\' and 单位名称<>\'天津公司\'"
    \'DataTables("收入成本表").LoadFilter = "单位名称<>\'天津公司\' and 单位名称<>\'天津公司\'"
    \'DataTables("结算情况表").LoadFilter = "单位名称<>\'公司\' and  单位名称<>\'天津公司\'"
    \'DataTables("库存情况表").LoadFilter = "单位名称<>\'公司\' and 单位名称<>\'天津公司\'"
Else
    \'DataTables("基本信息表").LoadFilter = "核算单位 = \'" & User.Name & "\'"
\'DataTables("开票收款表").LoadFilter = "核算单位 = \'" & User.Name & "\'"
\'DataTables("收入成本表").LoadFilter = "核算单位 = \'" & User.Name & "\'"
\'DataTables("结算情况表").LoadFilter = "核算单位 = \'" & User.Name & "\'"
\'DataTables("库存情况表").LoadFilter = "核算单位 = \'" & User.Name & "\'"
End If

\'DataTables("开票收款表").Load()
\'DataTables("收入成本表").Load()
\'DataTables("结算情况表").Load()
\'DataTables("库存情况表").Load()
\'DataTables("基本信息表").Load()