以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  动态加载,如何做模糊查询  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=150657)

--  作者:237756360
--  发布时间:2020/6/3 23:38:00
--  动态加载,如何做模糊查询
请大神指点!下面的代码如何做模糊查询。我应该把 Like加在哪里?

Dim nms() As String = {"井号","采集日期"} 
Dim sps() As String = {"\'","\'"} 
Dim bjf() As String = {" = "," = "}
Dim fds() As String = {"油井","采集日期"}
Dim Filter As String 
For i As Integer = 0 To nms.length - 1
    If e. Form.Controls(nms(i)). Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Filter = Filter & fds(i) & bjf(i) & sps(i) & e.Form.Controls(nms(i)).Value & sps(i)
    End If
Next
DataTables("日电能").LoadFilter = Filter
DataTables("日电能").Load()
[此贴子已经被作者于2020/6/3 23:38:59编辑过]

--  作者:有点蓝
--  发布时间:2020/6/4 9:05:00
--  
没有办法,like查询单独处理