以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助] (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=104715) |
-- 作者:huli503 -- 发布时间:2017/8/3 17:03:00 -- [求助] 各位老师,我后台有两个表,通过partTemplateId找到关联的taskTemplateMasterId,然后再通过找到的taskTemplateMasterId查询到TemplateName 此主题相关图片如下:1.png 此主题相关图片如下:2.png |
-- 作者:有点甜 -- 发布时间:2017/8/3 17:52:00 -- 1、不是可以用查询表?
http://www.foxtable.com/webhelp/scr/2321.htm
http://www.foxtable.com/webhelp/scr/2322.htm
2、你现在需要做什么功能?你直接设置关联,引用父表的值?
3、如果是要查找,一个个的一步步的查找就行了 http://www.foxtable.com/webhelp/scr/0396.htm
|
-- 作者:huli503 -- 发布时间:2017/8/3 20:00:00 -- 是这样,第一步:通过零件的ID号找到第一张表的partTemplateId 48,并找到了48下面的taskTemplateMaster Id号,第二步:通过找到的taskTemplateMaster Id号,在另外一张表上查找与taskTemplateMaster Id对应的制作工序内容,这两步想通过一个动作一次完成。 |
-- 作者:huli503 -- 发布时间:2017/8/3 20:01:00 -- 这两张表没有建立关联 |
-- 作者:有点甜 -- 发布时间:2017/8/3 20:29:00 -- 以下是引用huli503在2017/8/3 20:00:00的发言:
是这样,第一步:通过零件的ID号找到第一张表的partTemplateId 48,并找到了48下面的taskTemplateMaster Id号,第二步:通过找到的taskTemplateMaster Id号,在另外一张表上查找与taskTemplateMaster Id对应的制作工序内容,这两步想通过一个动作一次完成。
你find多次,或者select多次,不就好了?
http://www.foxtable.com/webhelp/scr/0396.htm
http://www.foxtable.com/webhelp/scr/0400.htm
|
-- 作者:huli503 -- 发布时间:2017/8/3 21:26:00 -- Dim b As Row = Tables("part_work").Current Dim drs As List(Of DataRow) drs = DataTables("part_work").Select("[partTemplateId] = \'" & b("partTemplateId")& "\'" ) For Each dr As DataRow In drs Output.show(dr("taskTemplateMasterId")) Next 我通过上面的代码可以遍历出第一张表taskTemplateMaster Id号,不知道怎样写代码通过这些ID号查找第二张表数据,请老师给出一个代码,谢谢。
|
-- 作者:有点甜 -- 发布时间:2017/8/3 21:46:00 -- Dim b As Row = Tables("part_work").Current
Dim drs As List(Of DataRow)
drs = DataTables("part_work").Select("[partTemplateId] = \'" & b("partTemplateId")& "\'" )
For Each dr As DataRow In drs
Dim fdr As DataRow = DataTables("某表").Find("taskTemplateMasterId = \'" & dr("taskTemplateMasterId") & "\'")
If fdr IsNot Nothing Then
End If
Next
|
-- 作者:huli503 -- 发布时间:2017/8/4 13:13:00 -- |
-- 作者:有点甜 -- 发布时间:2017/8/4 14:33:00 -- 改成这样
Dim b As Row = Tables("part_work").Current Dim str As String = DataTables("part_work").GetComboListString("taskTemplateMasterid", "[partTemplateId] = \'" & b("partTemplateId")& "\'" ) str = str.Replace("|", "\',\'") DataTables("零件清单维护_Table3").fill("select * from {workTemplateMaster} where taskTemplateMasterid in (\'" & str & "\')", "xx", False) |