- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]删除空白行的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=25176)
-- 发布时间：2012/11/2 12:03:00
-- [求助]删除空白行的问题
我想在数据填充后删除空白行，可当来源表再改后，数据重新填充时报错。代友如下
Dim f As New Filler
f.SourceTable = DataTables("分部装备") \'指定数据来源
f.SourceCols = "_identify,出厂编号,规格型号,装备名称" \'指定数据来源列,ePMS单价,检验周期,检验时间
f.DataTable = DataTables("装备管理") \'指定数据接收表
f.DataCols = "序号,出厂编号,规格型号,装备名称" \'指定数据接收列,ePMS单价,检验周期,检验时间
f.Append = False
f.Fill() \'填充数据
DataTables("装备管理").DeleteFor( " 序号 Is Null ") \'删除空白行
此主题相关图片如下：1.png
-- 发布时间：2012/11/2 12:18:00
--
因为这句 f.Append = False
如果要用这句的话，就保存，然后压缩项目，再执行代码。
-- 发布时间：2012/11/2 12:55:00
--
谢谢！
压缩项目咋弄啊?
-- 发布时间：2012/11/2 13:07:00
--
此主题相关图片如下：qq截图20121102130657.png
-- 发布时间：2012/11/2 14:28:00
--
哇 手工操作啊 能代码自动解决吗？谢谢了。
-- 发布时间：2012/11/2 14:33:00
--
我按你的说法增加了一行 “DataTables("装备管理").Save()”搞定了，非常感谢。