Foxtable(狐表)用户栏目专家坐堂 → 以下代码不管在窗口中填写多少行,要么只保存了一行,要么保存不上


  共有1784人关注过本帖树形打印复制链接

主题:以下代码不管在窗口中填写多少行,要么只保存了一行,要么保存不上

帅哥哟,离线,有人找我吗?
nuoyan88
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2159 积分:14971 威望:0 精华:0 注册:2017/10/12 13:00:00
以下代码不管在窗口中填写多少行,要么只保存了一行,要么保存不上  发帖心情 Post By:2017/11/26 23:55:00 [只看该作者]

用户已被锁定

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/11/27 8:41:00 [只看该作者]

Dim f As New Filler
f.SourceTable = DataTables("清洗包装记录临时表") '指定数据来源
f.SourceCols = "线别,投产日期,毛坯编码,成品描述,毛坯产地,生产批次,批次序号,成品编码,成品流水号,刻号日期,备注" '指定数据来源列
f.DataTable = DataTables("清洗包装记录") '指定数据接收表
f.DataCols = "线别,投产日期,毛坯编码,成品描述,毛坯产地,生产批次,批次序号,成品编码,成品流水号,刻号日期,备注" '指定数据接收列
f.Fill()


DataTables("清洗包装记录临时表").DataRows.Clear
DataTables("清洗包装记录临时表").addnew


 回到顶部