[求助] - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]

共有1484人关注过本帖树形打印复制链接主题：[求助]

huli503

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：130 积分：1688 威望：0 精华：0 注册：2016/10/1 20:59:00

[求助]

Post By：2017/8/3 17:03:00 [只看该作者]

各位老师,我后台有两个表,通过partTemplateId找到关联的taskTemplateMasterId,然后再通过找到的taskTemplateMasterId查询到TemplateName
图片点击可在新窗口打开查看

此主题相关图片如下：1.png

此主题相关图片如下：2.png

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：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

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：130 积分：1688 威望：0 精华：0 注册：2016/10/1 20:59:00

Post By：2017/8/3 20:00:00 [只看该作者]

是这样，第一步：通过零件的ID号找到第一张表的partTemplateId 48，并找到了48下面的taskTemplateMaster Id号，第二步:通过找到的taskTemplateMaster Id号，在另外一张表上查找与taskTemplateMaster Id对应的制作工序内容,这两步想通过一个动作一次完成。

huli503

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：130 积分：1688 威望：0 精华：0 注册：2016/10/1 20:59:00

Post By：2017/8/3 20:01:00 [只看该作者]

这两张表没有建立关联

有点甜

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：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

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：130 积分：1688 威望：0 精华：0 注册：2016/10/1 20:59:00

Post By：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"))

我通过上面的代码可以遍历出第一张表taskTemplateMaster Id号，不知道怎样写代码通过这些ID号查找第二张表数据，请老师给出一个代码，谢谢。

有点甜

小大 7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：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

huli503

小大 8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：130 积分：1688 威望：0 精华：0 注册：2016/10/1 20:59:00

Post By：2017/8/4 13:13:00 [只看该作者]

老师帮我看下，零件清单维护_Table3表中只加载找到的一行数据，问题出在什么地方，
图片点击可在新窗口打开查看

此主题相关图片如下：11.png

谢谢

有点甜

小大 9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：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)

下一主题 >> << 上一主题

主题：[求助]