以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助][讨论] 如何在关联表内做查找呢?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=62091)

--  作者:mxm121
--  发布时间:2014/12/25 11:06:00
--  [求助][讨论] 如何在关联表内做查找呢?
客户资料有个关联表 是跟踪记录

想在每个客户的关联的跟踪记录内做查找 请问这个如何写啊 关联表在窗体中

Dim dr As DataRow = DataTables("客户沟通跟踪记录").Find("沟通类型 = \'现场参观\' and 序号 = \'" &  Tables("客户资料").Current("客户编号")  & "\'","日期")

现在是这么搞的 可是这种方法貌似是在整个表里查找 效率不高

--  作者:有点甜
--  发布时间:2014/12/25 11:10:00
--  

Dim idx As Integer = Tables("关联表").FindRow("沟通类型 = \'现场参观\')

Dim r As Row

If idx > -1 Then

    r = Tables("关联表").Rows(i)

End If


--  作者:mxm121
--  发布时间:2014/12/25 11:19:00
--  
如果关联表里有多条符合条件的行 返回的是查找到的第一行吧 如果我有多个符合条件的行呢?
--  作者:狐狸爸爸
--  发布时间:2014/12/25 11:20:00
--  

设置筛选条件即可:

 

Tables("订单.订单明细").Filter = "数量 > 10000"


--  作者:mxm121
--  发布时间:2014/12/25 11:28:00
--  
我是想获得关联的沟通记录里 如果沟通方式为现场参观 则查找时间最早的那条记录
--  作者:有点甜
--  发布时间:2014/12/25 11:35:00
--  

Tables("关联表").Sort = "日期"

 

Dim idx As Integer = Tables("关联表").FindRow("沟通类型 = \'现场参观\')

Dim r As Row

If idx > -1 Then

    r = Tables("关联表").Rows(i)

End If


--  作者:mxm121
--  发布时间:2014/12/25 11:37:00
--  
额 搞定了 用狐爸的方式 filter  再sort 取第一个就是了