以文本方式查看主题

-  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=96227)

--  作者:cuicuibing
--  发布时间:2017/2/15 17:34:00
--  排除重复值
Dim Tbl As Table = Tables("成品")
Dim cur As String
cur = tbl.Current("物料编码")
DataTables("工序库维护选择_Table1").Fill("S elect * From {工序库} where 物料编码 = \'" & cur & "\'","shengchan" ,False)

从后台加载数据,如何排除第二列重复值得数据

--  作者:有点色
--  发布时间:2017/2/15 17:38:00
--  

参考

 

http://blog.csdn.net/anya/article/details/6407280/

 


--  作者:cuicuibing
--  发布时间:2017/2/15 17:45:00
--  
看不太明白,请版主给写个代码好吗。
--  作者:有点色
--  发布时间:2017/2/15 18:16:00
--  

 

"select * from {工序库} where 物料编码 = \'" & cur & "\' and 第二列 in (select 第二列 from {工序库} group by 第二列 having count(第二列) > 1)"

 


--  作者:cuicuibing
--  发布时间:2017/2/16 10:08:00
--  
DataTables("工序库维护选择_Table1").Fill("S elect * From {工序库} where 物料编码 = \'" & cur & "\'and 部件名称 in (s elect 部件名称  from {工序库} group by  部件名称 having count(部件名称) > 1)","shengchan" ,False)

版主,这样并没有排除  部件名称列的 重复值。

我想加载   部件名称  列重复值得  只加载一行

例子如下
第一列    第二列   第三列
111        222      20
111        222      21
123        333      22
102        333      23


加载后   第二列的重复值只显示一行的
第一列    第二列   第三列
111        222      20
123        333      22







--  作者:有点色
--  发布时间:2017/2/16 10:18:00
--  

"Select * From {工序库} where 物料编码 = \'" & cur & "\' and _Identify in (select min(_Identify)  from {工序库} group by  部件名称)"