以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 如何从后台加载符合以下条件的数据表? (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=170162) |
-- 作者:jswjyjf -- 发布时间:2021/7/14 12:32:00 -- 如何从后台加载符合以下条件的数据表? 我有个数据库,里面有个表,名称为客户,有个客户编码字段,内容为A-0001,A-0002,B-0001,B-0002 ,我想加载编码开头为b的数据,如何写代码? 谢谢
|
-- 作者:cd_tdh -- 发布时间:2021/7/14 12:50:00 -- Dim Filter As String
http://www.foxtable.com/webhelp/topics/0102.htm http://www.foxtable.com/webhelp/topics/2918.htm [此贴子已经被作者于2021/7/14 12:51:51编辑过]
|
-- 作者:jswjyjf -- 发布时间:2021/7/14 17:30:00 -- 如果B是变量 怎么写 |
-- 作者:jswjyjf -- 发布时间:2021/7/14 17:34:00 -- 会了 谢谢 Dim Filter As String Dim ztbm As String=_userztbm Filter = "[客户编码] Like \'" & ztbm & "%\'" msgbox(filter) DataTables("客户").LoadFilter = Filter \'设置加载条件 DataTables("客户").Load() \'加载数据 \'Tables("客户").ExtendLastCol=500 Tables("客户").sort="客户编码" |