以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何实现全表搜索的这个功能？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=26071)
--  作者：mario
--  发布时间：2012/11/23 17:11:00
--  如何实现全表搜索的这个功能？
先感谢专家。

我记得易表这个功能， 可以任意字符全表搜索，例如我有一个客户档案的，我输入一个“广”字，就会把所有含广字的记录搜出来，例如叫李广的，在广州的

谢谢了
--  作者：狐狸爸爸
--  发布时间：2012/11/23 17:14:00
--  

你可以自己写个，例如在窗口加入一个文本框，一个按钮，按钮的代码为：

 

Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("客户")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "\'*" & txt & "*\'"
    tbl.Filter = "客户ID Like " & txt & " Or 公司名称 Like " & txt & " Or 地址 Like " & txt & " Or 联系人 Like " & txt
End If
--  作者：mario
--  发布时间：2012/11/23 17:21:00
--  
 感谢专家的精彩解答 谢谢