以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教改进查询语句  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=89607)

--  作者:gzdw
--  发布时间:2016/8/25 13:05:00
--  请教改进查询语句
在一个查询窗口中,按型号规格查询的语句如下:
With e.Form.Controls("型号规格")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "型号规格 like \'*" & .Value & "*\'"
        \'型号规格 = \'" & .Value & "\'"
    End If
End With

但是,型号规格在输入时,已有类型:155*155*70 这样的内容。
在实际执行查询时,输入155*155 请会出错。
如果只输入型号规格的155*就不会出现错误提示,但查询结果多了

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20160825130113.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2016/8/25 13:06:07编辑过]

--  作者:大红袍
--  发布时间:2016/8/25 13:40:00
--  
With e.Form.Controls("型号规格")
    If .Value IsNot Nothing Then
        If Filter > "" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & "型号规格 like \'%" & .Text.Replace("*", "[*]") & "%\'"
    End If
End With
[此贴子已经被作者于2016/8/25 13:40:04编辑过]

--  作者:gzdw
--  发布时间:2016/8/25 14:43:00
--  
谢谢红版主,测试可以.