Foxtable(狐表)用户栏目专家坐堂 → [求助]求解决加载树的错误


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

主题:[求助]求解决加载树的错误

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
[求助]求解决加载树的错误  发帖心情 Post By:2018/5/28 8:04:00 [显示全部帖子]


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

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


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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/5/28 8:07:00 [显示全部帖子]

怎么论坛不能贴代码了

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/5/28 8:09:00 [显示全部帖子]


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

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180528080723.jpg
图片点击可在新窗口打开查看
我还想增加不同分支公司人员登录后加载不同的数据权限功能,求代码怎么写

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/5/28 8:11:00 [显示全部帖子]


加载树代码

Dim Filter As String
If e.node.Text = "加载所有数据" Then
    Filter = ""
Else
    Dim dr As DataRow = e.Node.DataRow
    Select Case e.Node.Level
        Case 0
            Filter ="[年度] = '" & dr("年度") & "'"
        Case 1
            Filter ="[年度] = '" & dr("年度") & "' And [分支公司] = '" & dr("分支公司") & "'"
        Case 2
            Filter ="[年度] = '" & dr("年度") & "' And [分支公司] = '" & dr("分支公司") & "' And [项目类别] = '" & dr("项目类别") & "'"
        Case 3
            Filter ="[年度] = '" & dr("年度") & "' And [分支公司] = '" & dr("分支公司") & "' And [项目类别] = '" & dr("项目类别") & "' And [项目名称] = '" & dr("项目名称") & "'"

    End Select
End If
With DataTables("项目决算资金拨付表")
    .LoadFilter = Filter '设置加载条件
    .LoadPage = 0 '加载第一页
    .LoadTop = 5 '每页5行
    .Load()
    e.Form.Controls("TextBox1").Value = 1 & "/" & .TotalPages
End With

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/5/28 8:24:00 [显示全部帖子]


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

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/5/28 8:46:00 [显示全部帖子]

好的

[此贴子已经被作者于2018/5/28 8:46:50编辑过]

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/5/28 9:06:00 [显示全部帖子]

加载树窗口已正常,还是我外部数据库和和内部的表名称不一致的问题
外部表设置了加载条件,但有错误

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/5/28 9:06:00 [显示全部帖子]


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

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/5/28 14:01:00 [显示全部帖子]

在外部数据表设置了加载条件
可还是显示的全部数据
帮忙看下哪里出了错
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180528135937.jpg
图片点击可在新窗口打开查看

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

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/5/28 15:03:00 [显示全部帖子]

加载树报错
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180528150230.jpg
图片点击可在新窗口打开查看

 回到顶部
总数 11 1 2 下一页