以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]ComboBox筛选不希望出现多余的值。  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=55639)

--  作者:liujywwy
--  发布时间:2014/8/20 15:07:00
--  [求助]ComboBox筛选不希望出现多余的值。

在商务下单查询表,只能查询技术支持邮箱等于登录用户名的行,不符合的不加载不出现。

 

ComboBox---->selectedindexchanged代码如下:明明增加了技术支持邮箱  =\'"& User.name & "\'为什么还是把所有的客户名称都列出来。难道用andalso?请帮忙看看

 

If e.Sender.text<>"所有客户" Then
    Tables("商务下单查询表").Filter="客户=\'"& e.sender.text &"\'and 状态=\'Published\' and 技术支持邮箱  =\'"& User.name & "\'"
Else
    Tables("商务下单查询表").Filter="状态 = \'Published\' and 技术支持邮箱  =\'"& User.name & "\'"
End If


--  作者:有点甜
--  发布时间:2014/8/20 15:10:00
--  

 呃,不应该有错,代码就是筛选user.name的行。

 

If e.Sender.text<>"所有客户" Then
    Tables("商务下单查询表").Filter = "客户=\'" & e.sender.text & "\' And 状态=\'Published\' and 技术支持邮箱  =\'" & User.name & "\'"
Else
    Tables("商务下单查询表").Filter = "状态 = \'Published\' and 技术支持邮箱  =\'" & User.name & "\'"
End If

 


--  作者:liujywwy
--  发布时间:2014/8/20 15:19:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:客户筛选.png
图片点击可在新窗口打开查看
客户筛选的下拉列表也应该只有符合技术支持邮箱和登录用户名相等的客户才对吧,而不应该把所有的客户都列出吧。
--  作者:有点甜
--  发布时间:2014/8/20 15:22:00
--  

 呃,那你就在生成ComboList的时候,加入条件限制

 

e.Form.Controls("ComboBox").ComboList = "xxxxxxx"

 

http://www.foxtable.com/help/topics/0925.htm

 

http://www.foxtable.com/help/topics/1435.htm

 

 

 


--  作者:liujywwy
--  发布时间:2014/8/20 15:43:00
--  
以下是引用有点甜在2014-8-20 15:22:00的发言:

 呃,那你就在生成ComboList的时候,加入条件限制

 

e.Form.Controls("ComboBox").ComboList = "xxxxxxx"

 

http://www.foxtable.com/help/topics/0925.htm

 

http://www.foxtable.com/help/topics/1435.htm

代码如下: 

e.Sender.ComboList=DataTables("商务下单查询表").GetComboListString("客户","[技术支持邮箱] = \'\' " & User.name & " \'\'")
e.Sender.Items.Insert(0,"所有客户")
 

怎么提示语法错误:“liujiyong”运算符后缺少操作数。

 


--  作者:有点甜
--  发布时间:2014/8/20 15:46:00
--  

改一下

 

e.Sender.ComboList=DataTables("商务下单查询表").GetComboListString("客户", "[技术支持邮箱] = \'" & User.name & "\'")
e.Sender.Items.Insert(0,"所有客户")