- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 在Datalist中应用筛选功能 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=4778)
-- 发布时间：2009/10/29 11:18:00
-- 在Datalist中应用筛选功能
用如下代码的筛选功能，如何与Datalist表中的数据同步，谢谢
Dim Filter As String
With e.Form.Controls("StartDate")
If .Value IsNot Nothing Then
If Filter >"" Then
Filter = Filter & " And "
End If
Filter = Filter & "日期 >= #" & .Value & "#"
End If
End With
With e.Form.Controls("EndDate")
If .Value IsNot Nothing Then
If Filter >"" Then
Filter = Filter & " And "
End If
Filter = Filter & "日期 <= #" & .Value & "#"
End If
End With
If Filter > "" Then
Tables("出库主表").Filter = Filter
End If
Dim dst As WinForm.DataList = e.Form.Controls("DataList1")
dst.DataTable = DataTables("出库主表")
dst.Build()
此主题相关图片如下：qq截图未命名.jpg
-- 发布时间：2009/10/29 11:19:00
--
劝楼主别再用Datalist了,都准备取消了,至多再用一年
-- 发布时间：2009/10/29 11:49:00
--
哈，为什么啊，不过还是谢谢！
-- 发布时间：2009/10/29 11:51:00
--
以下是引用woodiy在2009-10-29 11:49:00的发言：
哈，为什么啊，不过还是谢谢！
建议还是改成:table吧,这个功能完一可以取代Datalist了,所以才会取消它
-- 发布时间：2009/10/30 7:02:00
--
设计快不要用这个了,楼主是不是好久没有来了,这个以后肯定要淘汰的.用table一样的.