- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]一个模糊和精确混合查询的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=25340)
-- 发布时间：2012/11/6 22:24:00
-- [求助]一个模糊和精确混合查询的问题
Dim txt As String = e.Form.Controls("TextBox1").Text
Dim txtOld As String
Dim tbl As Table = Tables("上车操作_地址编号_Table1")
If txt = "" Then
tbl.Filter = ""
Else
txtOld= txt
txt = "\'*" & txt & "*\'"
tbl.Filter = "Gongsi_Shou Like " & txt & " OR Gongsi_Fa Like " & txt & " Or Bianhao = " & txtOld
End If
我希望查询的结果，Bianhao按照精确查询，Gongsi_Shou和Gongsi_Fa按照模糊查询。
本代码在查询数字型时正常，但是在查询其他数据类型，比如查询“公司”时报错
此主题相关图片如下：360软件小助手截图20121106222230.jpg
-- 发布时间：2012/11/6 22:30:00
--
上文件
-- 发布时间：2012/11/6 22:55:00
--
例子不方便上，目的是实现某些字段的模糊查询和某些字段的精确查询
-- 发布时间：2012/11/6 23:01:00
--
也不方便回答。
-- 发布时间：2012/11/6 23:41:00
--
嗯嗯，楼上正解。对txt的类型进行判断，看能否转成数值型，不行，左右就要加单引号\'
http://www.foxtable.com/help/topics/0324.htm
-- 发布时间：2012/11/7 11:32:00
--
谢谢各位，狐表论坛高人真多啊。