- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 加载树显示年月日 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=90513)
-- 发布时间：2016/9/14 17:24:00
-- 加载树显示年月日
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:代码.txt |
不知道为什么发不了代码，只能上传附件形式了
这代码出来的效果是2016-09-14然后下一级就是 客户名称
我希望做出的效果是2016下一级是09再下一级是14再下一级是客户名称
求解！！
-- 发布时间：2016/9/14 17:45:00
--
这里有介绍，其中第二个例子，就是按年月的，你参考一下：
http://www.foxtable.com/webhelp/scr/2054.htm
有问题再说话/
-- 发布时间：2017/2/21 21:03:00
--
老师假如还要加一个加载所有数据 该怎么办对于日期的加载老师能否设计一个完整的代码，我弄了一天都没有弄好
-- 发布时间：2017/2/21 21:12:00
--
上传你的项目或者代码
-- 发布时间：2017/2/22 10:18:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
老师你看一下，加载所有就有问题了
-- 发布时间：2017/2/22 10:27:00
--
Dim Filter As String
If e.node.Text = "加载所有数据" Then
Filter = ""
Else
Dim dr As DataRow = e.Node.DataRow
Dim Year As Integer = dr("年")
Dim Month As Integer = dr("月")
Dim day As Integer = 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(日期) = " & day
End Select
End If
DataTables("表A").LoadFilter = Filter
DataTables("表A").Load()
-- 发布时间：2017/2/22 10:47:00
--
老师如何才能按住Ctrl键同时加载多个节点下的数据
-- 发布时间：2017/2/22 10:48:00
--
以下是引用铜豆在2017/2/22 10:47:00的发言：
老师如何才能按住Ctrl键同时加载多个节点下的数据
老师如何才能按住Ctrl键同时加载多个节点下的数据
用这种 http://www.foxtable.com/webhelp/scr/2503.htm