- 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=129132)
-- 发布时间：2018/12/22 10:01:00
-- [求助] 查询历史记录
版主，这个图中是一票出货记录，想实双击某条记录后，出现这个产品以前的包装历史记录包括boxno,shipppingno以及和哪些产品装在一起的清单。以下代码该如何修改。谢谢。
If e.Table.Current Is Nothing Then Return
Dim wz As Integer = Tables("Packinglist").FindRow("GSSPartNo=\'" & e.Table.Current("boxno") &"\'")
If wz >=0 Then
Tables("Packinglist").Position = wz
End If
此主题相关图片如下：捕获.png
-- 发布时间：2018/12/22 11:04:00
--
Dim wz As Integer = Tables("Packinglist").FindRow("GSSPartNo=\'" & e.Table.Current("GSSPartNo") &"\'")
-- 发布时间：2018/12/22 11:23:00
--
谢谢，这个是指到找到的这个记录，可不可以这个明细只出现这个产品以前包装过的相关的箱号的记录，多余的不需要呢？只要装在一个箱中的都需显示
-- 发布时间：2018/12/22 11:32:00
--
没看懂，截图说明一下
-- 发布时间：2018/12/22 13:16:00
--
版主，如果双击记录CH_000121 就出现这种结果如图，这个产品以前其它产品装要哪些boxno中。
此主题相关图片如下：捕获.png
-- 发布时间：2018/12/22 14:19:00
--
通过什么条件可以知道那些是以前的boxno？设置筛选条件咯
-- 发布时间：2018/12/23 10:58:00
--
版主，只知道GSSPartNo,就能找出这个GSSPartNo跟以前哪些产品合装过吗？
-- 发布时间：2018/12/23 12:14:00
--
版主，只知道GSSPartNo,就能找出这个GSSPartNo跟以前哪些产品合装过吗？
直接筛选某表，条件设置成 GSSPartNo=\'xxxx\' 不就行了？
-- 发布时间：2018/12/23 14:53:00
--
但是这个GSSPartNo装在该boxno中的其它GSSPartno就没有显示了。 想知道这个GSSPartNO,以前装过的Boxno，还有哪些其它GSSPartno。
-- 发布时间：2018/12/23 15:55:00
--
但是这个GSSPartNo装在该boxno中的其它GSSPartno就没有显示了。 想知道这个GSSPartNO,以前装过的Boxno，还有哪些其它GSSPartno。
根据 GSSPartNo 查找 Boxno，然后筛选 Boxno
Dim s = DataTables("表A").GetComboListString("Boxno", "GSSPartNo=\'" & xxx & "\'")
s = s.replace("|", "\',\'")
Tables("表B").filter = "Boxno in (\'" & s & "\')"