- 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=159299)
-- 发布时间：2020/12/21 17:07:00
-- 筛选数据的代码问题
老师，请教一下
我在窗口中设置一个筛选按钮，代码如下：
Tables("存货出入库窗口_Table2").Fill("Select a.索引标识,a.库存数量,a.单价,a.库存金额 Fro m {仓库} a INNER JOIN (Select 索引标识,Max(行标识) As 行标识 Fro m {仓库} Group By 索引标识) b on a.索引标识 = b.索引标识 And a.行标识 = b.行标识 Order By a.索引标识",True)
如果我想加一个条件，就是在以上代码基础上，再加一个筛选条件 索引标识 = "ComboBox1"中的内容
我该如何写代码
谢谢老师
-- 发布时间：2020/12/21 17:31:00
--
多看几遍：http://www.foxtable.com/webhelp/topics/1284.htm
-- 发布时间：2020/12/21 17:50:00
--
好的老师 谢谢您
-- 发布时间：2020/12/23 0:39:00
--
老师，我在窗口中一个按钮的单击代码如下：
此主题相关图片如下：1.jpg
Tables("存货出入库窗口_Table2").Fill("Select a.索引标识,a.库存数量,a.单价,a.库存金额 Fro m {仓库} a INNER JOIN (Select 索引标识,Max(行标识) As 行标识 Fro m {仓库} Group By 索引标识) b on a.索引标识 = b.索引标识 And a.行标识 = b.行标识 where a.存货三级明细 =\'" & e.for m.controls("ComboBox3").text & "\' Order By a.索引标识",True)
以上代码执行后报错，报错内容见附件，您帮忙分析分析是什么问题
此主题相关图片如下：1.jpg[此贴子已经被作者于2020/12/23 0:44:38编辑过]
-- 发布时间：2020/12/23 8:32:00
--
应该不是这句代码的问题，
Tables("存货出入库窗口_Table2").Fill("Select a.索引标识,a.库存数量,a.单价,a.库存金额 Fro m {仓库} a INNER JOIN (Select 索引标识,Max(行标识) As 行标识 Fro m {仓库} Group By 索引标识) b on a.索引标识 = b.索引标识 And a.行标识 = b.行标识 where a.存货三级明细 =\'" & e.for m.controls("ComboBox3").text & "\' Order By a.索引标识",True)
‘下面提示框能不能弹出？
msgbox("Select a.索引标识,a.库存数量,a.单价,a.库存金额 Fro m {仓库} a INNER JOIN (Select 索引标识,Max(行标识) As 行标识 Fro m {仓库} Group By 索引标识) b on a.索引标识 = b.索引标识 And a.行标识 = b.行标识 where a.存货三级明细 =\'" & e.for m.controls("ComboBox3").text & "\' Order By a.索引标识")
-- 发布时间：2020/12/23 12:02:00
--
老师，我将代码写入后，出现的弹窗如下，您受累给看看
此主题相关图片如下：1.jpg
-- 发布时间：2020/12/23 13:34:00
--
能够弹出提示就不是这个代码的问题，检查其它代码