Foxtable(狐表)用户栏目专家坐堂 → 加载树变量问题


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

主题:加载树变量问题

帅哥哟,离线,有人找我吗?
xxcwdlwgo
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:157 积分:2001 威望:0 精华:0 注册:2012/5/29 15:35:00
加载树变量问题  发帖心情 Post By:2017/1/1 19:34:00 [只看该作者]

加载树代码中,如何设置变量?我试了几次,报从字符串……到类型boolean的转换无效。输入字符串的格式不正确。

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2017/1/2 19:58:00 [只看该作者]

提问要具体,至少要贴出代码,别人才能帮你分析。


 回到顶部
帅哥哟,离线,有人找我吗?
xxcwdlwgo
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:157 积分:2001 威望:0 精华:0 注册:2012/5/29 15:35:00
  发帖心情 Post By:2017/1/3 8:35:00 [只看该作者]

Tables("gzbb_lwg").OpenloadTree("使用车站|电梯编号",,10,"使用车站 = '" & Vars("myzz") & "'" )


 回到顶部
帅哥哟,离线,有人找我吗?
xxcwdlwgo
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:157 积分:2001 威望:0 精华:0 注册:2012/5/29 15:35:00
  发帖心情 Post By:2017/1/3 8:41:00 [只看该作者]

找到问题所在了,谢谢

 回到顶部
帅哥哟,离线,有人找我吗?
xxcwdlwgo
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:157 积分:2001 威望:0 精华:0 注册:2012/5/29 15:35:00
  发帖心情 Post By:2017/1/3 8:59:00 [只看该作者]

加载树窗口出现后,点刷新按钮时,我设置的Tables("gzbb_lwg").OpenloadTree("使用车站|电梯编号",,100,,"使用车站 = '" & Vars("myzz") & "'" )显示是部分记录,但在刷新后把全部记录显示 了。

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/1/3 9:05:00 [只看该作者]

 你要在beforeLoad事件写控制代码

 

http://www.foxtable.com/webhelp/scr/2057.htm

 


 回到顶部
帅哥哟,离线,有人找我吗?
xxcwdlwgo
  7楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:157 积分:2001 威望:0 精华:0 注册:2012/5/29 15:35:00
  发帖心情 Post By:2017/1/3 16:20:00 [只看该作者]

在表事件中beforeLoad事件写控制代码后,启动编译后的程序,输入登录后,程序也没有报错误,程序不显示。在任务管理器里可以看到这个程序。
我重新删除这段代码后,程序可以显示。

[此贴子已经被作者于2017/1/3 16:21:37编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/1/3 16:31:00 [只看该作者]

你代码肯定写错了。贴出你写的代码

 

参考6楼的代码来写,直接设置 e.DataTable.Filter。

 

 

 


 回到顶部
帅哥哟,离线,有人找我吗?
xxcwdlwgo
  9楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:157 积分:2001 威望:0 精华:0 注册:2012/5/29 15:35:00
  发帖心情 Post By:2017/1/3 16:41:00 [只看该作者]

    Select Case user.Group
        Case "路局管理员"

                e.DataTable.LoadFilter = "[局名]='" & Vars("myjm") & "'"
                e.DataTable.Load()
 
        Case "站段管理员"
                e.DataTable.LoadFilter = "[站段名称]='" & Vars("myzd") & "'"
                e.DataTable.Load()

        Case "车站管理员"
            
                e.DataTable.LoadFilter ="[使用车站]='" & Vars("myzz")  & "'"
                e.DataTable.Load()


        End  Select



 回到顶部
帅哥哟,离线,有人找我吗?
有点色
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/1/3 16:47:00 [只看该作者]

 这句代码,不能写

 

e.DataTable.Load()

 

 不然,会死循环的。


 回到顶部