Foxtable(狐表) → 用户栏目 → 专家坐堂 → Syntax error: Missing operand before 'And' operator.


  共有2382人关注过本帖树形打印复制链接

主题：Syntax error: Missing operand before 'And' operator.
帅哥，在线噢！
有点蓝
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107807 积分：548386 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/3/11 9:01:00 [显示全部帖子]

其它地方按照下面说明自行改正

With ddh
If .Value IsNot Nothing Then
    If Filter > "" Then  '这个地方不需要改动，请保持原样，意思是如果之前已经添加了条件，就增加一个and连接符
      Filter = Filter & " And "
    Else
         filter=filter & "[采购单号] like '" & ddh.text & "'"       
     End If

End If
End  With
 回到顶部
帅哥，在线噢！
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107807 积分：548386 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/3/11 9:50:00 [显示全部帖子]

改之后的代码重新发上来

msgbox(Filter) 看看最后弹出的条件
 回到顶部
帅哥，在线噢！
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107807 积分：548386 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/3/11 11:06:00 [显示全部帖子]

……
    End If
       filter=filter & "[物供号] = "& v &" " 
End If
End  With
msgbox(Filter) 输入所有的条件，弹出的内容截图发上来看看

If Filter > "" Then
      If  qs.Checked = True Then  
……
 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：107807 积分：548386 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2020/3/11 12:05:00 [显示全部帖子]

错误的用法
With e.Form.Controls("TextBox1")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        Else
            filter=filter & "[采购单号] like '" & ddh.text & "'"
        End If
        
    End If
End  With

正确的用法，其它条件自己检查
With e.Form.Controls("TextBox1")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        filter=filter & "[供应商属性_供应商名称] like '%" & .Value & "%'"
    End If
End  With
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 5 次数据查询