专家坐堂-Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  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=136996)

--  作者：有点甜
--  发布时间：2019/6/26 9:26:00
--

If _UserGroup = "管理员" Then
    Filter = ""
End If

e.Form.controls("检测结果明细").Table.DataTable.LoadPage = 0
e.Form.controls("检测结果明细").Table.DataTable.LoadFilter = filter
e.Form.controls("检测结果明细").Table.DataTable.Load

--  作者：有点甜
--  发布时间：2019/6/27 17:12:00
--

If _UserGroup = "管理员" Then
    e.Form.controls("检测结果明细").Table.DataTable.LoadPage = 0
    e.Form.controls("检测结果明细").Table.DataTable.LoadFilter = filter
    e.Form.controls("检测结果明细").Table.DataTable.Load
Else
    If Filter >"" Then
        e.Form.controls("检测结果明细").Table.DataTable.LoadPage = 0
        e.Form.controls("检测结果明细").Table.DataTable.LoadFilter = filter
        e.Form.controls("检测结果明细").Table.DataTable.Load
    End If
End If