- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 一样的Filler代码，为什么一个能执行，一个却出错呢？都是数据表 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=32596)
-- 发布时间：2013/5/4 21:58:00
-- 一样的Filler代码，为什么一个能执行，一个却出错呢？都是数据表
代码如下（在项目事件Maintablechanged)中：
If MainTable.Name = "可用余额" Then
Dim f As New Filler
f.SourceTable = DataTables("合同档案")
f.SourceCols = "分公司"
f.DataTable = DataTables("可用余额")
f.DataCols = "分公司"
f.ExcludenullValue= True
f.ExcludeExistValue=True
f.Append=False
f.Fill()
End If
If MainTable.Name = "提成明细" Then
Dim f As New Filler
f.SourceTable = DataTables("合同档案")
f.SourceCols = "合同编号"
f.DataTable = DataTables("提成明细")
f.DataCols = "合同编号"
f.ExcludenullValue= True
f.ExcludeExistValue=True
f.Append=False
f.Filter="[合同状态] <> \'全清\'"
f.Fill()
End If
结果，第一个能正常填充，第二个就出错了，错误如下图：
此主题相关图片如下：1.png
-- 发布时间：2013/5/4 22:44:00
--
这两行交换位置试试，还不行的话，请提交示例文件：
f.Filter="[合同状态] <> \'全清\'"
f.Append=False