在软件案例中有一个“动态加载演示”,“筛选功能”代码如下:
Dim Value()As String
Dim Filter As string
Value = e.Node.FullPath.Split("\")
Select Case e.Node.Level
Case 0
Filter ="[产品] = '" & Value(0) & "'"
Case 1
Filter ="[产品] = '" & Value(0) & "' And [客户] = '" & Value(1) & "'"
End Select
DataTables("订单").LoadFilter = Filter
DataTables("订单").Load()
我想只显示同一产品中不同雇员的最后一条记录改怎么改写代码,例如:
此主题相关图片如下:1.jpg
本人新手,在此请教前辈了
再延伸一下,假如数据表再加一列“发生日期”,筛选的时候添加选项“截止日期”,筛选出来的结果
是发生在截止日期前的最后一条记录,代码又是如何的
[此贴子已经被作者于2012-3-29 15:47:09编辑过]