以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  多表后台加载数据问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=96678)

--  作者:cuicuibing
--  发布时间:2017/2/26 9:28:00
--  多表后台加载数据问题
当前窗口,从后台加载多表数据。请教代码

数据表  产品   数据已加载。  在  产品编辑窗口中加载多表数据。
Dim Tbl As Table = Tables("产品")
Dim cur As String
cur = tbl.Current("物料编码")

表的关系     产品.物料编码  =  工序主表.物料编码
                工序主表.编码  =  工序明细.编码
                工序明细.工序编码 = 工序表.工序编码

请教   产品编辑_table1  afterlod 中,从后台加载数据为   
          工序主表.物料编码  等于  tbl.Current("物料编码")
          工序主表.编码  =  工序明细.编码
          工序明细.工序编码 = 工序表.工序编码   
         的数据。

请斑竹帮忙写下代码,自己弄了半天也没写正确。

--  作者:cuicuibing
--  发布时间:2017/2/26 15:48:00
--  
版主看看这个,帮忙处理下
--  作者:有点色
--  发布时间:2017/2/26 15:50:00
--  

 参考查询表

 

http://www.foxtable.com/webhelp/scr/2322.htm

 

 得到sql语句以后,再写代码fill到table1中 http://www.foxtable.com/webhelp/scr/2912.htm

 


--  作者:cuicuibing
--  发布时间:2017/2/27 9:34:00
--  
Tables("产品编辑_Table1").Fill("S elect  {物料表}.物料编码,物料名称,{物料表}.图纸号,{物料表}.图纸信息,部件,规格,部件数,部件名称,部件规格,部件量,{工序库明细}.工段,计算规格,数量,配色,产品工序规格,工序名称,工序规格,修改定额,厂内单价,人数,工序说明  From (({物料表} Inner JOIN {工序库明细主表} ON {工序库明细主表}.[物料编码] = {物料表}.[物料编码]) Inner JOIN {工序库明细} ON {工序库明细}.[编码] = {工序库明细主表}.[编码]) Inner JOIN {工序表} ON {工序表}.[工序编号] = {工序库明细}.[工序编码]","A" ,True)


教版主,以上代码如果加入条件  物料编码等于某个值的。代码应该写到哪里,看帮助没理解过来。   

物料编码 = \'" & cur & "\'

物料编码   在 物料表  以及 工序库明细主表中

--  作者:有点色
--  发布时间:2017/2/27 9:47:00
--  

 写在最后面即可

 

 where {物料表}.物料编码 = \'" & cur & "\'"