- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 两个表想乘怎么做 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=125374)
-- 发布时间：2018/9/27 10:47:00
-- 两个表想乘怎么做
档案表有1000条数据，仓库表有20个仓库，生成每个仓库对应1000条数据，就是这2个表想乘要怎么做
-- 发布时间：2018/9/27 10:48:00
--
参考
http://www.foxtable.com/webhelp/scr/1533.htm
-- 发布时间：2018/9/27 15:19:00
--
-- 发布时间：2018/9/27 15:23:00
--
你的20个仓库，写成循环，即可。一个仓库执行一遍2楼代码即可。
-- 发布时间：2018/9/27 16:22:00
--
以下是引用有点甜在2018/9/27 15:23:00的发言：
你的20个仓库，写成循环，即可。一个仓库执行一遍2楼代码即可。
你的20个仓库，写成循环，即可。一个仓库执行一遍2楼代码即可。
这个不就是把表A的数据复制到表B吗，我要生成一张全新的表，因为我的表AB都是查询表，而且我需要从表A和表B分别取数据，来生成。这个怎么写
-- 发布时间：2018/9/27 16:22:00
--
不会做请上传具体项目。
-- 发布时间：2018/9/27 16:35:00
--
就把这两个表相乘 等于生成 每个仓库都20条数据 总200条
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.zip |
[此贴子已经被作者于2018/9/27 16:36:30编辑过]
-- 发布时间：2018/9/27 16:42:00
--
For Each r As DataRow In DataTables("表C").Select("")
For Each dr1 As DataRow In DataTables("表b").Select("")
Dim dr2 As DataRow = DataTables("表a").AddNew()
For Each dc As DataCol In DataTables("表b").DataCols
dr2(dc.Name) = dr1(dc.name)
Next
dr2("仓库") = r("仓库")
Next
Next
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.foxdb |
-- 发布时间：2018/9/27 16:46:00
--
谢谢
-- 发布时间：2018/9/27 16:52:00
--
以下是引用有点甜在2018/9/27 16:42:00的发言：
For Each r As DataRow In DataTables("表C").Select("")
For Each dr1 As DataRow In DataTables("表b").Select("")
Dim dr2 As DataRow = DataTables("表a").AddNew()
For Each dc As DataCol In DataTables("表b").DataCols
dr2(dc.Name) = dr1(dc.name)
Next
dr2("仓库") = r("仓库")
Next
Next
| 下载信息 [文件大小：320.0 KB 下载次数：0] | |
| 点击浏览该文件:管理项目1.foxdb 真实的数据量太大了 会卡住，有没有其他写法 |