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

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  and 使用  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=34481)

--  作者：yifan3429
--  发布时间：2013/6/8 8:39:00
--  and 使用

DataTables("总表").LoadFilter = "工程师 = \'" & User.Name & "\'" And 跟单= & User.Name & \'" And 业务= & User.Name & \'"

这个要怎么改才对

--  作者：Bin
--  发布时间：2013/6/8 8:41:00
--

DataTables("总表").LoadFilter = "工程师 = \'" & User.Name & "\' And 跟单=\'" & User.Name & "\' And 业务=\'" & User.Name & "\'"

[此贴子已经被作者于2013-6-8 8:41:33编辑过]

--  作者：yifan3429
--  发布时间：2013/6/8 9:13:00
--

If User.Name = "经理" Then
    DataTables("总表").LoadFilter = ""
Else
DataTables("总表").LoadFilter = "工程师 = \'" & User.Name & "\' And 跟单=\'" & User.Name & "\' And 项目业务=\'" & User.Name & "\'"
End If
DataTables("总表").Load()

这样用不对吗   更换用户不显示任何数据   原来用下面的是会显示登录人自己的数据行的

If User.Name = "经理" Then
DataTables("总表").LoadFilter = ""
Else
DataTables("总表").LoadFilter = "工程师 = \'" & User.Name & "\'

End If
DataTables("总表").Load()

现在需要怎样改我放在项目LoadUserSetting事件里面   对吗

[此贴子已经被作者于2013-6-8 9:14:29编辑过]

--  作者：XYT
--  发布时间：2013/6/8 9:18:00
--
DataTables("总表").LoadFilter = "工程师 = \'" & User.Name & "\' "

--  作者：yifan3429
--  发布时间：2013/6/8 11:37:00
--

If User.Name = "经理" Then
DataTables("总表").LoadFilter = ""
Else
DataTables("总表").LoadFilter = "工程师 = \'" & User.Name & "\' And 跟单=\'" & User.Name & "\' And 项目业务=\'" & User.Name & "\'"
End If
DataTables("总表").Load()

这句代码为什么不能显示登陆人的数据行

--  作者：XYT
--  发布时间：2013/6/8 11:45:00
--
你确保你数据是否正确，你都说你单用DataTables("总表").LoadFilter = "工程师 = \'" & User.Name & "\' " 这个有，那你就检查下跟单和项目业务那里的是否正确，有没有多空格

--  作者：yifan3429
--  发布时间：2013/6/8 12:08:00
--

以下是引用XYT在2013-6-8 11:45:00的发言：
你确保你数据是否正确，你都说你单用DataTables("总表").LoadFilter = "工程师 = \'" & User.Name & "\' " 这个有，那你就检查下跟单和项目业务那里的是否正确，有没有多空格

源代码如下   帮我看看有问题吗    表类型附上

If User.Name = "经理" Then
    DataTables("总表").LoadFilter = ""
Else
DataTables("总表").LoadFilter = "工程师 = \'" & User.Name & "\' And 跟单 =\'" & User.Name & "\' And 项目业务 =\'" & User.Name & "\'"
End If
DataTables("总表").Load()

此主题相关图片如下：360桌面截图20130608115725.jpg

--  作者：Bin
--  发布时间：2013/6/8 12:11:00
--
你是报错,还是没东西加载出来.. 你没有对应的数据自然就没加载出来啊.很正常的啊!

--  作者：XYT
--  发布时间：2013/6/8 12:11:00
--

代码没问题，你看看有没有对应的数据

--  作者：yifan3429
--  发布时间：2013/6/8 14:05:00
--

以下是引用XYT在2013-6-8 12:11:00的发言：

代码没问题，你看看有没有对应的数据

数据是有的

此主题相关图片如下：360桌面截图20130608140146.jpg