以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 查询与赋值 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=171489) |
-- 作者:aoc103 -- 发布时间:2021/8/31 23:14:00 -- 查询与赋值 For Each dr1 As DataRow In DataTables("排产登记表_明细").DataRows Dim dr2 As DataRow =DataTables("TBL_商品表").SQLFind("商品编号=\'" & dr1("商品编号") & "\'") If dr2 IsNot Nothing Then dr1("品牌")=dr2("品牌") dr1("型号")=dr2("型号") dr1("片数")=dr2("片数") dr1("规格")=dr2("规格") dr1("坯底工艺")=dr2("坯底工艺") dr1("手感工艺")=dr2("手感工艺") dr1("印花工艺")=dr2("印花工艺") dr1("产品名称")=dr2("产品名称") End If Next 这段代码是用写在子表里的AFTERLOAD里的 ,意思是一载入数据 品牌 型号 片数这些字段都会临时从商品表里载入数据 我发现 查询与赋值放在一起效率非常低下 帮助里有的代码是写 查询与赋值是分开的,但不知道要怎么分开,请帮我分解下
|
-- 作者:有点蓝 -- 发布时间:2021/9/1 8:30:00 -- 参考:http://www.foxtable.com/webhelp/topics/2225.htm 另外,如果商品表数据经常需要使用的,建议一次性加载进来使用,然后使用Find
|