以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]筛选求助  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=101160)
--  作者：hahahehe21
--  发布时间：2017/5/25 22:19:00
--  [求助]筛选求助
想实现在窗口产品控件中输入表_业务估价.产品名称中的其中几个字可以筛选出所有包含该产品的所有合同记录，如何写筛选按钮的代码？ 
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:测试.foxdb
--  作者：有点色
--  发布时间：2017/5/25 22:44:00
--  
Dim txt As String = e.Form.controls("combobox1").Text
Dim str As String = DataTables("业务估价").GetComboListString("合同号", "产品名称 like \'%" & txt & "%\'")
str = str.Replace("|", "\',\'")
e.Form.controls("table1").Table.filter = "合同号 in (\'" & str & "\')"