以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何让加载树有条件加载?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=50022)

--  作者:xiaohuli
--  发布时间:2014/4/28 10:12:00
--  如何让加载树有条件加载?

想实现如果经理登录进去后,显示一个加载树,以产品名称和客户名称进行加载,但设置一个条件,只加载已经审核(逻辑列)过的行,未审核的不加载,这个如何实现。


--  作者:xiaohuli
--  发布时间:2014/4/28 10:13:00
--  
加载树窗口已经做好了,就是不知如何设置只加载已审核的行的条件。
--  作者:有点甜
--  发布时间:2014/4/28 10:14:00
--  

如果是用系统的加载树,可以看这里

 

看实例6 http://www.foxtable.com/help/topics/2022.htm

 


--  作者:有点甜
--  发布时间:2014/4/28 10:15:00
--  

 如果是自己做的加载树,只需要在点击节点的时候加一个条件便可。

 

 贴出你原先的代码看看

[此贴子已经被作者于2014-4-28 10:16:29编辑过]

--  作者:Bin
--  发布时间:2014/4/28 10:15:00
--  
前面这些帮助都有例子.http://www.foxtable.com/help/topics/2742.htm

只加载 已审核的行, 只需要在拼接完条件之后,再追加    & " and 已经审核=true"  即可

--  作者:xiaohuli
--  发布时间:2014/4/28 10:29:00
--  
老师不对呀,我本来的加载树可以加载数据,但加载出来的是全部的(已审核和未审核的都能加载出来,但在加了你的那个条件("And 审核 = true ")后,直接就是列名 \'true\' 无效。
--  作者:有点甜
--  发布时间:2014/4/28 10:30:00
--  

 有没有加空格?

 

 " And 审核 = true "


--  作者:Bin
--  发布时间:2014/4/28 10:31:00
--  
你拼接的不对,代码发出来看看.   弹出一下拼接后的条件看看


--  作者:xiaohuli
--  发布时间:2014/4/28 10:41:00
--  

Dim Filter As String
If e.node.Text = "加载所有数据" Then
    Filter = ""
Else
    Dim dr As DataRow = e.Node.DataRow \'获取生成此节点的DataRow
    Select Case e.Node.Level
        Case 0
            Filter ="[类型] = \'" & dr("类型") & "\' " And 审核 = True ""
        Case 1
            Filter ="[类型] = \'" & dr("类型") & "\' And [名称] = \'" & dr("名称") & "\' " And 审核 = True ""
    End Select
End If
DataTables("gdzc").LoadFilter = Filter
DataTables("gdzc").Load()

 


--  作者:Bin
--  发布时间:2014/4/28 10:43:00
--  
Case 0
            Filter ="[类型] = \'" & dr("类型") & "\'  And 审核 = True "
        Case 1
            Filter ="[类型] = \'" & dr("类型") & "\' And [名称] = \'" & dr("名称") & "\'  And 审核 = True "


其实可以简便一点,直接在最后

DataTables("gdzc").LoadFilter = Filter & " And 审核 = True"