专家坐堂-[求助] 如何加载业务为空的行Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 如何加载业务为空的行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=94023)

--  作者：gengwvi
--  发布时间：2016/12/13 16:16:00
--  [求助] 如何加载业务为空的行

设置一个加载条件，只加载 user = 业务员姓名和业务员姓名为空的行，如何修改以下代码？

If User.Group = "经理" Then
    DataTables("到访登记表").LoadFilter = ""
    DataTables("合同登记").LoadFilter = ""
    DataTables("意向客户表").LoadFilter = ""
    DataTables("收款确认单").LoadFilter = ""
    DataTables("酒会登记系统").LoadFilter = ""
    DataTables("安邦人寿数据库").LoadFilter = ""
    DataTables("中国人寿数据库").LoadFilter = ""
    DataTables("英大人寿数据库").LoadFilter = ""
    DataTables("交银康联数据库").LoadFilter = ""
Else
    DataTables("到访登记表").LoadFilter = "业务员 = \'" & User.Name & "\'"
    DataTables("合同登记").LoadFilter = "业务员 = \'" & User.Name & "\'"
    DataTables("意向客户表").LoadFilter = "业务员 = \'" & User.Name & "\'"
    DataTables("收款确认单").LoadFilter = "业务员 = \'" & User.Name & "\'"
    DataTables("酒会登记系统").LoadFilter = "业务员 = \'" & User.Name & "\'"
End If

--  作者：有点蓝
--  发布时间：2016/12/13 16:20:00
--
DataTables("到访登记表").LoadFilter = "业务员 = \'" & User.Name & "\' and 业务员 is null"