| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 关于窗口中多表加载的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=107205) |
|
| -- 作者：hopestarxia -- 发布时间：2017/9/23 11:24:00 -- 关于窗口中多表加载的问题 设计了一个物料清单， 清单内容总共分了四个表记录：分别为： l_goodsbompfxx 记录清单的备注，设计人等主要信息； l_goodsbom 记录物料清单具体的清单内容（材料组成内容） l_goodsbomgxyq 记录生产工序要求； l_goodsbomxmgl 记录其他的一些管理条例； 以上四个表有相同的主产品ID,"goodsid"字段相关联； 设计了清单的增加，修改窗口， 同时还有一个能显示已经做好清单的列表窗口“基础清单列表”窗口， 现在基础配方列表窗口选择中任意一个产品后，点击““基础清单列表”窗口中的”修改“功能按钮，调出清单修改窗口， 清单修改窗口打开后后三个表无内容，请问老师是任何的问题造成的？ 清单修改窗口加裁时代码如下： \'收集并填充字段内容 Dim dst As Table = Tables("基础清单列表_Table1") Dim dr As Row = dst.Current \'获得选定行 vars("str1") = dr("goodsid") \'保存原货品单号,确保变更后可以删除原记录 \'生成出入库明细数据 DataTables("l_goodsbompfxx").LoadFilter = "[goodsid] = \'" & vars("str1") & "\'" DataTables("l_goodsbompfxx").Load(False) DataTables("l_goodsbom").LoadFilter = "[goodsid] = \'" & vars("str1") & "\'" DataTables("l_goodsbom").Load(False) DataTables("l_goodsbomgxyq").LoadFilter = "[goodsid] = \'" & vars("str1") & "\'" DataTables("l_goodsbomgxyq").Load(False) DataTables("l_goodsbomxmgl").LoadFilter = "[goodsid] = \'" & vars("str1") & "\'" DataTables("l_goodsbomxmgl").Load(False)
|
|
| -- 作者：有点蓝 -- 发布时间：2017/9/23 11:54:00 -- vars("str1")是什么内容？ 其它表有这个ID对应的记录吗？ 如果是外部表，数据库总goodsid列的列类型是什么？
|
|
| -- 作者：hopestarxia -- 发布时间：2017/9/23 12:04:00 --
|
|
| -- 作者：有点蓝 -- 发布时间：2017/9/23 12:06:00 -- int列条件不需要单引号 LoadFilter = "[goodsid] = " & vars("str1")
|