Foxtable(狐表)用户栏目专家坐堂 → [求助]'实现条件查询和模糊查询相结合


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

主题:[求助]'实现条件查询和模糊查询相结合

帅哥哟,离线,有人找我吗?
新航程小何
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:629 积分:4786 威望:0 精华:0 注册:2014/9/17 11:34:00
[求助]'实现条件查询和模糊查询相结合  发帖心情 Post By:2016/9/6 10:30:00 [只看该作者]

各位老师,我想实现条件查询和模糊查询相结合的实现,
1、通过代码建立sqltable;DataTables("InstiUserList_table1").fill("select * f rom {N_AgriInsti} where AgriInstiId <> 9",Vars("Url1"),False)
2、实现条件查询和模糊查询相结合
Dim  ccb1 As String =e.Form.controls("ccb1").value
Dim  tb1 As String =e.Form.controls("tb1").value
Dim sql1 As String ="InstiType='" &  ccb1 & "' "
Dim sql2 As String ="InstiName like '% & tb1 & % ' "
Dim sql As String ="select *  f rom {N_AgriInsti}  where 1=1 "

If   ccb1 <> ""
    sql=sql & "  and  "  & sql1
End If

If   tb1 <> ""
    sql=sql & "  and  "  &  sql2
End If

If ccb1 = "" AndAlso tb1 = ""
    MessageBox.show("请选择查询条件!","提示")
Else
    DataTables("InstiUserList_table1").sqlload(sql)
End If


结果不显示数据,不知道问题出拿了?

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/9/6 10:40:00 [只看该作者]

Dim sql2 As String ="InstiName like '%" & tb1 & "%' "

 回到顶部
帅哥哟,离线,有人找我吗?
新航程小何
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:629 积分:4786 威望:0 精华:0 注册:2014/9/17 11:34:00
  发帖心情 Post By:2016/9/6 11:18:00 [只看该作者]

我这里实现还是一样,是不是因为是外部数据的原因?

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/9/6 11:29:00 [只看该作者]

测试没有问题,跟内部外部没有关系

msgbox(sql)弹出看看sql的最终内容

 回到顶部
帅哥哟,离线,有人找我吗?
新航程小何
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:629 积分:4786 威望:0 精华:0 注册:2014/9/17 11:34:00
  发帖心情 Post By:2016/9/6 11:37:00 [只看该作者]

恩恩,好的,多谢老师。搞定了,是like格式不合适

 回到顶部