Foxtable(狐表) → 用户栏目 → 专家坐堂 → 加载树刷新问题，权限控制


  共有5931人关注过本帖树形打印复制链接

主题：加载树刷新问题，权限控制
帅哥哟，离线，有人找我吗？
大红袍
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/9/4 9:09:00 [显示全部帖子]

你可以在beforeLoad事件加入条件控制加载。

 

http://www.foxtable.com/help/topics/2057.htm

 

不然，就自己做一个，http://www.foxtable.com/help/topics/2054.htm

 
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/9/6 9:16:00 [显示全部帖子]

以下是引用hawkgo在2015/9/5 22:03:00的发言：
数据的加载是按照条件了，但是加载树的目录还是全部的。有没有办法，把刷新禁用掉？

 

没办法，只能自己做一个加载目录树。
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/9/6 10:21:00 [显示全部帖子]

以下是引用hawkgo在2015/9/6 10:15:00的发言：
非常感谢！能否给个邮箱我？我还没有发短信的权限呀。


 

你发帖成长成六尾狐，就有发短信的权限了。有什么事，都可以发帖来说。
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/9/6 10:40:00 [显示全部帖子]

图片点击可在新窗口打开查看

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/9/6 21:52:00 [显示全部帖子]

报什么错？代码应该没问题。

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/9/6 21:53:00 [显示全部帖子]

看是不是这个问题 http://www.foxtable.com/help/topics/2344.htm

 
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/9/7 22:23:00 [显示全部帖子]

去命令窗口执行

 

msgbox(DataTables("拜访日志").LoadFilter)
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/9/7 22:34:00 [显示全部帖子]

去看beforeLoad事件

 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/9/8 0:09:00 [显示全部帖子]

不应该，nodemousedoubleclick事件代码改成这样看看

 

Dim dr As DataRow = e.Node.DataRow '获取生成此节点的行
Dim Filter As String
Dim Year As Integer = dr("年")
Dim Month As Integer = dr("月")
Dim Da As Integer = dr("日")
Dim Sales As String = dr("销售姓名")


Select Case e.Node.Level
    Case 0
        Filter ="Year(记录时间) = " & Year
    Case 1
        Filter ="Year(记录时间) = " & Year & " And Month(记录时间) = " & Month
    Case 2
         Filter ="Year(记录时间) = " & Year & " And Month(记录时间) = " & Month & "  And DAY(记录时间) = " & Da 
    Case 3
         Filter ="Year(记录时间) = " & Year & " And Month(记录时间) = " & Month & "  And DAY(记录时间) = " & Da & "  And 销售姓名 =  '" & Sales & "'"

End Select


DataTables("拜访日志").LoadFilter = Filter
msgbox(DataTables("拜访日志").LoadFilter)
DataTables("拜访日志").Load
msgbox(DataTables("拜访日志").LoadFilter)
 回到顶部
帅哥哟，离线，有人找我吗？
大红袍
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：贵宾 帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00 		  发帖心情 Post By：2015/9/8 14:16:00 [显示全部帖子]

Case  "区域经理", "区域经理2"
        
        Dim fl As String = "(销售姓名 = '" & User.Name & "' or 大区经理 = '" & User.Name & "')"
        If e.DataTable.LoadFilter = "" Then
            e.DataTable.LoadFilter = fl
        ElseIf e.DataTable.LoadFilter.IndexOf(fl) < 0 Then '如果没有包括雇员条件
            e.DataTable.LoadFilter = e.DataTable.Loadfilter & " And " & fl
        End If
 回到顶部
总数 19 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05078 秒, 5 次数据查询